Change 13499 by jhi@alpha on 2001/12/06 20:46:04
Retract #13496 for now.
Affected files ...
.... //depot/perl/t/base/lex.t#16 edit
.... //depot/perl/t/base/term.t#17 edit
Differences ...
==== //depot/perl/t/base/lex.t#16 (xtext) ====
Index: perl/t/base/lex.t
--- perl/t/base/lex.t.~1~ Thu Dec 6 14:00:06 2001
+++ perl/t/base/lex.t Thu Dec 6 14:00:06 2001
@@ -53,8 +53,8 @@
EOF
EOE
-print <<'EOS' . <<\EOF;
-ok 12 - make sure single quotes are honored \nnot ok
+print <<`EOS` . <<\EOF;
+echo ok 12
EOS
ok 13
EOF
==== //depot/perl/t/base/term.t#17 (xtext) ====
Index: perl/t/base/term.t
--- perl/t/base/term.t.~1~ Thu Dec 6 14:00:06 2001
+++ perl/t/base/term.t Thu Dec 6 14:00:06 2001
@@ -19,7 +19,7 @@
# check `` processing
-$x = `$^X -le "print 'hi there'"`;
+$x = `echo hi there`;
if ($x eq "hi there\n") {print "ok 2\n";} else {print "not ok 2\n";}
# check $#array
End of Patch.
