From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Thu, 19 Jul 2012 22:53:56 +0000 (-0500)
Subject: remove unneeded \Q\E in test
X-Git-Tag: v0.004200~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=407b3a584084bc6b11420edd43cb0dd387cea427;p=p5sagit%2FLog-Contextual.git

remove unneeded \Q\E in test
---

diff --git a/Changes b/Changes
index 451fd86..d1e42ee 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 ChangeLog for Log-Contextual
 
+  - Fix warning in test suite in Perl 5.16
+
 0.004100 2012-03-29
   - Log::Contextual::WarnLogger now supports customized log levels via the
     'levels' constructor argument (Karen Etheridge)
diff --git a/t/warnlogger-with-levels.t b/t/warnlogger-with-levels.t
index 3ca3df2..1d7cad7 100644
--- a/t/warnlogger-with-levels.t
+++ b/t/warnlogger-with-levels.t
@@ -80,7 +80,7 @@ use Test::Fatal;
         local $ENV{BAR_UPTO} = 'foo';
         like(
             exception { $l->is_bar },
-            qr/\QUnrecognized log level 'foo'\E in \$ENV{BAR_UPTO}\E/,
+            qr/Unrecognized log level 'foo' in \$ENV{BAR_UPTO}/,
             'Cannot use an unrecognized log level in UPTO',
         );
     }