From: Jesse Luehrs <doy@tozt.net>
Date: Wed, 25 Apr 2012 05:52:20 +0000 (-0500)
Subject: the quote style in this message changed over the years
X-Git-Tag: 2.0502~1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=889822da00ac33eed82a1bc9dfdd773c466098c8;p=gitmo%2FMoose.git

the quote style in this message changed over the years
---

diff --git a/t/metaclasses/overloading.t b/t/metaclasses/overloading.t
index e3a7e54..daeed8c 100644
--- a/t/metaclasses/overloading.t
+++ b/t/metaclasses/overloading.t
@@ -4,6 +4,8 @@ use warnings;
 use Test::More;
 use Test::Fatal;
 
+my $quote = qr/['`"]/;
+
 {
     package Foo;
     use Moose;
@@ -73,7 +75,7 @@ BEGIN { $plus_impl = sub { $plus = 1; "plus" } }
     my $minus_impl = sub { $minus = 1; "minus" };
 
     like(exception { Foo::Overloaded->new - Foo::Overloaded->new },
-         qr/Operation "-": no method found/);
+         qr/Operation $quote-$quote: no method found/);
 
     $meta->add_overloaded_operator('-' => $minus_impl);
 
@@ -98,7 +100,7 @@ BEGIN { $plus_impl = sub { $plus = 1; "plus" } }
     $meta->remove_overloaded_operator('-');
 
     like(exception { Foo::Overloaded->new - Foo::Overloaded->new },
-         qr/Operation "-": no method found/);
+         qr/Operation $quote-$quote: no method found/);
 }
 
 my $times = 0;
@@ -145,7 +147,7 @@ my $divided = 0;
     is($times, 1);
 
     like(exception { Foo::OverloadedMethod->new / Foo::OverloadedMethod->new },
-         qr{Operation "/": no method found});
+         qr{Operation $quote/$quote: no method found});
 
     $meta->add_overloaded_operator('/' => 'divided');
 
@@ -170,7 +172,7 @@ my $divided = 0;
     $meta->remove_overloaded_operator('/');
 
     like(exception { Foo::OverloadedMethod->new / Foo::OverloadedMethod->new },
-         qr{Operation "/": no method found});
+         qr{Operation $quote/$quote: no method found});
 }
 
 done_testing;