diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2001-08-28 16:23:43 +0200 |
|---|---|---|
| committer | Artur Bergman <sky@nanisky.com> | 2001-08-28 11:20:13 +0000 |
| commit | 44f0be639a72c23a82ef49a1790b9b38a494dd31 (patch) | |
| tree | 9d66fa9d6fe027ae7fcc7e5ad0f7e013d9628d53 /pp_ctl.c | |
| parent | 7409d7190cf6c057fdad5f6134646f347f12e367 (diff) | |
| download | perl-44f0be639a72c23a82ef49a1790b9b38a494dd31.tar.gz | |
put useful info in %INC for files loaded by a hook in @INC
Message-ID: <20010828142343.A19299@rafael>
p4raw-id: //depot/perl@11771
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3160,7 +3160,7 @@ trylocal: { } Perl_sv_setpvf(aTHX_ namesv, "/loader/0x%"UVxf"/%s", - PTR2UV(SvANY(loader)), name); + PTR2UV(SvRV(dirsv)), name); tryname = SvPVX(namesv); tryrsfp = 0; |