diff options
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/perldoc.PL | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/utils/perldoc.PL b/utils/perldoc.PL index ed533f518f..d4090c88a6 100644 --- a/utils/perldoc.PL +++ b/utils/perldoc.PL @@ -384,6 +384,7 @@ if ($Is_MSWin32) { $tmp = "$ENV{TEMP}\\perldoc1.$$"; push @pagers, qw( more< less notepad ); unshift @pagers, $ENV{PAGER} if $ENV{PAGER}; + for (@found) { s,/,\\,g } } elsif ($Is_VMS) { $tmp = 'Sys$Scratch:perldoc.tmp1_'.$$; push @pagers, qw( most more less type/page ); |