From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Tue, 17 Mar 2009 13:34:46 +0000 (+0100)
Subject: Fix a warnings test that was failing due to smart match dispatch changes
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6ac83b6344167664acd39ef656560e3f3bbc361c;p=p5sagit%2Fp5-mst-13.2.git

Fix a warnings test that was failing due to smart match dispatch changes
---

diff --git a/t/lib/warnings/9uninit b/t/lib/warnings/9uninit
index e0b186a..50db322 100644
--- a/t/lib/warnings/9uninit
+++ b/t/lib/warnings/9uninit
@@ -1815,7 +1815,7 @@ Use of uninitialized value in addition (+) at - line 4.
 use warnings 'uninitialized';
 my $v;
 my $fn = sub {};
-$v = 1 + ($fn ~~ 1);
+$v = 1 + (1 ~~ $fn);
 EXPECT
 Use of uninitialized value in addition (+) at - line 4.
 ########