Actually submit previous change.

[p5sagit/p5-mst-13.2.git] / t / lib / warnings / 2use

diff --git a/t/lib/warnings/2use b/t/lib/warnings/2use
index 7810287..eef0f3f 100644 (file)
--- a/t/lib/warnings/2use
+++ b/t/lib/warnings/2use
@@ -72,6 +72,12 @@ my $a =+ 1 ;
 EXPECT
 Reversed += operator at - line 3.
 ########
+-w
+no warnings 'reserved' ;
+foo.bar;
+EXPECT
+Useless use of concatenation (.) or string in void context at - line 3.
+########
 
 --FILE-- abc
 my $a =+ 1 ;