diff options
| author | Craig A. Berry <craigberry@mac.com> | 2001-12-10 10:38:14 -0600 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-10 21:34:46 +0000 |
| commit | cda41bc103281f18855c0da8ed14366b1358eda9 (patch) | |
| tree | 5a8add71ec151734f375c7fd272c505146c425ac /t/comp/multiline.t | |
| parent | 17d0565f9ef9f25d30c0f88552d7867e9430e0a5 (diff) | |
| download | perl-cda41bc103281f18855c0da8ed14366b1358eda9.tar.gz | |
cat2type in tests for VMS
Message-Id: <5.1.0.14.2.20011210154846.01aef188@exchi01>
p4raw-id: //depot/perl@13603
Diffstat (limited to 't/comp/multiline.t')
| -rwxr-xr-x | t/comp/multiline.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/comp/multiline.t b/t/comp/multiline.t index b4b04dad14..bc02391b0e 100755 --- a/t/comp/multiline.t +++ b/t/comp/multiline.t @@ -36,7 +36,7 @@ if ($z eq $y) {print "ok 2\n";} else {print "not ok 2\n";} if ($count == 7) {print "ok 3\n";} else {print "not ok 3\n";} -$_ = (($^O eq 'MSWin32') || $^O eq 'NetWare') ? `type Comp.try` +$_ = (($^O eq 'MSWin32') || $^O eq 'NetWare' || $^O eq 'VMS') ? `type Comp.try` : ($^O eq 'MacOS') ? `catenate Comp.try` : `cat Comp.try`; |