projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f567092
)
The change #7187 was not so good on VMS.
author
Craig A. Berry
<craigberry@mac.com>
Sun, 22 Oct 2000 23:03:08 +0000
(18:03 -0500)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Mon, 23 Oct 2000 04:10:11 +0000
(
04:10
+0000)
Subject: [PATCH perl@7369] VMS perldoc.PL fix for double quoted temp filename
Message-Id: <p04330102b617d093470b@[172.16.52.1]>
p4raw-link: @7187 on //depot/perl:
a79ff10558a3b8e128b0898794bddcf07255f408
p4raw-id: //depot/perl@7410
utils/perldoc.PL
patch
|
blob
|
history
diff --git
a/utils/perldoc.PL
b/utils/perldoc.PL
index
e1dd783
..
313be20
100644
(file)
--- a/
utils/perldoc.PL
+++ b/
utils/perldoc.PL
@@
-409,7
+409,11
@@
sub page {
}
else {
foreach my $pager (@pagers) {
+ if ($Is_VMS) {
+ last if system("$pager $tmp") == 0; # quoting prevents logical expansion
+ } else {
last if system("$pager \"$tmp\"") == 0;
+ }
}
}
}