From: Vincent Pit <vince@profvince.com>
Date: Mon, 4 Apr 2011 16:33:45 +0000 (+0200)
Subject: Silence a bogus "Useless use of smart match in void context" warning
X-Git-Tag: v0.09~6
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=18e872b42cf358210ac2eb7604b5ad44476ecfce;p=perl%2Fmodules%2Fre-engine-Plugin.git

Silence a bogus "Useless use of smart match in void context" warning
---

diff --git a/t/60-taint/rx.t b/t/60-taint/rx.t
index acaf6df..296e20a 100644
--- a/t/60-taint/rx.t
+++ b/t/60-taint/rx.t
@@ -27,7 +27,7 @@ use re::engine::Plugin (
         ok(tainted($str) => 'matched string tainted');
 
         my $one = $str;
-        my $two = $str; $two ~~ /(.*)/; $two = $1;
+        my $two = $str; $two =~ /(.*)/; $two = $1;
 
         ok(tainted($one));
         ok(!tainted($two));