From bc769488d48dfc3f9427d7cf0b8a8f5098cc9d84 Mon Sep 17 00:00:00 2001 From: Abhijit Menon-Sen Date: Fri, 31 Aug 2001 12:15:44 +0000 Subject: Integrate 11778 into mainline. p4raw-id: //depot/perl@11799 --- t/base/term.t | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 't/base') diff --git a/t/base/term.t b/t/base/term.t index 1d688b8f5b..000bff1b15 100755 --- a/t/base/term.t +++ b/t/base/term.t @@ -40,7 +40,12 @@ if (($x | 1) == 101) {print "ok 5\n";} else {print "not ok 5\n";} # check <> pseudoliteral -open(try, "/dev/null") || open(try,"Dev:Null") || open(try,"nla0:") || (die "Can't open /dev/null."); +if ($^O eq 'MacOS') { + open(try,"Dev:Null") || (die "Can't open /dev/null."); +} else { + open(try, "/dev/null") || open(try,"nla0:") || (die "Can't open /dev/null."); +} + if ( eq '') { print "ok 6\n"; } -- cgit v1.2.1