projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
661cc6a
)
propagate changed error text
author
Gurusamy Sarathy
<gsar@cpan.org>
Mon, 6 Sep 1999 19:09:06 +0000
(19:09 +0000)
committer
Gurusamy Sarathy
<gsar@cpan.org>
Mon, 6 Sep 1999 19:09:06 +0000
(19:09 +0000)
p4raw-id: //depot/perl@4090
t/pragma/sub_lval.t
patch
|
blob
|
history
diff --git
a/t/pragma/sub_lval.t
b/t/pragma/sub_lval.t
index
f6d867c
..
c382ad5
100755
(executable)
--- 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