projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
perl @ 27483 fix lib/Pod/Simple/t/corpustest.t to work on VMS ODS-2
[p5sagit/p5-mst-13.2.git]
/
lib
/
vmsish.t
diff --git
a/lib/vmsish.t
b/lib/vmsish.t
index
71ca3b5
..
f40e434
100644
(file)
--- a/
lib/vmsish.t
+++ b/
lib/vmsish.t
@@
-5,7
+5,10
@@
BEGIN {
@INC = '../lib';
}
-my $Invoke_Perl = qq(MCR $^X "-I[-.lib]");
+my $perl = $^X;
+$perl = VMS::Filespec::vmsify($perl) if $^O eq 'VMS';
+
+my $Invoke_Perl = qq(MCR $perl "-I[-.lib]");
require "./test.pl";
plan(tests => 25);