X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FDynaLoader%2Fdl_dld.xs;h=2443ab0d6946b63b7b3204ec6a95847a274f5010;hb=4619340914cc8b5438e9411eca00b9f6a4805995;hp=a0bdcc8de14abd44997778863a5efc83c12617d7;hpb=924508f06969d29692d1762cecf34a062431e1af;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/DynaLoader/dl_dld.xs b/ext/DynaLoader/dl_dld.xs index a0bdcc8..2443ab0 100644 --- a/ext/DynaLoader/dl_dld.xs +++ b/ext/DynaLoader/dl_dld.xs @@ -58,10 +58,10 @@ dl_private_init() dlderr = dld_init("/proc/self/exe"); if (dlderr) { #endif - dlderr = dld_init(dld_find_executable(origargv[0])); + dlderr = dld_init(dld_find_executable(PL_origargv[0])); if (dlderr) { char *msg = dld_strerror(dlderr); - SaveError("dld_init(%s) failed: %s", origargv[0], msg); + SaveError("dld_init(%s) failed: %s", PL_origargv[0], msg); DLDEBUG(1,PerlIO_printf(PerlIO_stderr(), "%s", LastError)); } #ifdef __linux__