From: Gurusamy Sarathy <gsar@cpan.org>
Date: Mon, 6 Sep 1999 19:09:06 +0000 (+0000)
Subject: propagate changed error text
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5c0bc88794e8f23611847511c08d1721d70cf0bb;p=p5sagit%2Fp5-mst-13.2.git

propagate changed error text

p4raw-id: //depot/perl@4090
---

diff --git a/t/pragma/sub_lval.t b/t/pragma/sub_lval.t
index f6d867c..c382ad5 100755
--- a/t/pragma/sub_lval.t
+++ b/t/pragma/sub_lval.t
@@ -239,7 +239,7 @@ eval <<'EOE' or $_ = $@;
 EOE
 
 print "# '$_', '$x0', '$x1'.\nnot "
-  unless /Can\'t modify non-lvalue indirect subroutine call/;
+  unless /Can\'t modify non-lvalue subroutine call/;
 print "ok 30\n";
 
 sub lv0 {use attrs 'lvalue';}		# Converted to lv10 in scalar context