Change 13496 by jhi@alpha on 2001/12/06 19:47:53
Subject: [PATCH t/base/lex.t, term.t] Purging echo from base tests
From: Michael G Schwern <[EMAIL PROTECTED]>
Date: Thu, 6 Dec 2001 15:15:28 -0500
Message-ID: <20011206201528.GF16414@blackrider>
Affected files ...
.... //depot/perl/t/base/lex.t#15 edit
.... //depot/perl/t/base/term.t#16 edit
Differences ...
==== //depot/perl/t/base/lex.t#15 (xtext) ====
Index: perl/t/base/lex.t
--- perl/t/base/lex.t.~1~ Thu Dec 6 13:00:05 2001
+++ perl/t/base/lex.t Thu Dec 6 13:00:05 2001
@@ -53,8 +53,8 @@
EOF
EOE
-print <<`EOS` . <<\EOF;
-echo ok 12
+print <<'EOS' . <<\EOF;
+ok 12 - make sure single quotes are honored \nnot ok
EOS
ok 13
EOF
==== //depot/perl/t/base/term.t#16 (xtext) ====
Index: perl/t/base/term.t
--- perl/t/base/term.t.~1~ Thu Dec 6 13:00:05 2001
+++ perl/t/base/term.t Thu Dec 6 13:00:05 2001
@@ -19,7 +19,7 @@
# check `` processing
-$x = `echo hi there`;
+$x = `$^X -le "print 'hi there'"`;
if ($x eq "hi there\n") {print "ok 2\n";} else {print "not ok 2\n";}
# check $#array
End of Patch.