diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 1999-03-17 20:10:44 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-03-24 10:38:05 +0000 |
| commit | 562a7b0c67b6218259506760bd4728f2f0c6093b (patch) | |
| tree | 8cdc1fa81166184bfb07594e19cb9e39afbdf4ff /utils/perldoc.PL | |
| parent | 918c0b2d7bc71242c4810571f6971cac26c1327c (diff) | |
| download | perl-562a7b0c67b6218259506760bd4728f2f0c6093b.tar.gz | |
applied suggested patch, modulo superseded parts
Message-id: <01J8YFGIHW2W001E7S@mail.newman.upenn.edu>
Subject: [PATCH 5.005_56] Miscellaneous VMS-specific fixes
p4raw-id: //depot/perl@3153
Diffstat (limited to 'utils/perldoc.PL')
| -rw-r--r-- | utils/perldoc.PL | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/perldoc.PL b/utils/perldoc.PL index 6d175f19a5..ed533f518f 100644 --- a/utils/perldoc.PL +++ b/utils/perldoc.PL @@ -326,7 +326,7 @@ foreach (@pages) { unless ($opt_m) { if ($Is_VMS) { my($i,$trn); - for ($i = 0; $trn = $ENV{'DCL$PATH'.$i}; $i++) { + for ($i = 0; $trn = $ENV{'DCL$PATH;'.$i}; $i++) { push(@searchdirs,$trn); } push(@searchdirs,'perl_root:[lib.pod]') # installed pods |