X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FPackage-DeprecationManager.git;a=blobdiff_plain;f=t%2Fbasic.t;h=20e6e5d2b3acbaa8941373eb1d08c9ff1bb33436;hp=1032d4a0e7c43b35cc981a3cdb73224ecb2f5795;hb=eb17fbd4c32b13bbcc6d32e6bf2ac78092d44779;hpb=20ad0ac13a894876c3f582de5323f257b9123052

diff --git a/t/basic.t b/t/basic.t
index 1032d4a..20e6e5d 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -187,7 +187,7 @@ use Test::Requires {
     package My::Baz;
 
     ::stderr_like{ My::Package2::foo() }
-        qr/^foo is deprecated at t.basic\.t line \d+\s+My::Baz/,
+        qr/^foo is deprecated at t.basic\.t line \d+\.?\s+My::Baz/,
         'deprecation warning for call to My::Package2::foo() and mentions My::Baz but not My::Package[12]';
 
     ::stderr_is{ My::Package2::foo() }
@@ -199,7 +199,7 @@ use Test::Requires {
         'no deprecation warning for call to My::Package1::foo()';
 
     ::stderr_like{ My::Package2::bar() }
-        qr/^bar is deprecated at t.basic\.t line \d+\s+My::Baz/,
+        qr/^bar is deprecated at t.basic\.t line \d+\.?\s+My::Baz/,
         'deprecation warning for call to My::Package2::foo() and mentions My::Baz but not My::Package[12]';
 
     ::stderr_is{ My::Package2::bar() }
@@ -211,7 +211,7 @@ use Test::Requires {
     package My::Quux;
 
     ::stderr_like{ My::Package1::foo() }
-        qr/^foo is deprecated at t.basic\.t line \d+\s+My::Quux/,
+        qr/^foo is deprecated at t.basic\.t line \d+\.?\s+My::Quux/,
         'deprecation warning for call to My::Package1::foo() and mentions My::Quux but not My::Package[12]';
 
     ::stderr_is{ My::Package1::foo() }