[Bps-public-commit] Data-ICal branch, master, updated. 0.20-2-gaed1575

Thomas Sibley trs at bestpractical.com
Mon May 13 15:22:38 EDT 2013


The branch, master has been updated
       via  aed1575d15a1ebea6e6e32f3b72a77a8ecaf351d (commit)
      from  bfa350653a7b6fb62d56d3b5c8f7eca794d7ad58 (commit)

Summary of changes:
 t/12.verson1.t | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

- Log -----------------------------------------------------------------
commit aed1575d15a1ebea6e6e32f3b72a77a8ecaf351d
Author: Thomas Sibley <trs at bestpractical.com>
Date:   Mon May 13 12:22:14 2013 -0700

    Revert "Update warning matches in tests to be partial matches"
    
    The failure under 5.18 is much more sinister than that, and Test::Warn
    fails sometimes but not others.  Oy.
    
    This reverts commit bfa350653a7b6fb62d56d3b5c8f7eca794d7ad58.

diff --git a/t/12.verson1.t b/t/12.verson1.t
index 8fe495f..5430323 100644
--- a/t/12.verson1.t
+++ b/t/12.verson1.t
@@ -12,14 +12,14 @@ BEGIN { use_ok('Data::ICal') }
 
 my $cal;
 
-warnings_like { $cal = Data::ICal->new(filename => 't/ics/version1.ics') }
-    [ {carped => qr/Unknown property for Data::ICal::Entry::Event: malarm/},
-    {carped => qr/Unknown property for Data::ICal::Entry::Event: dcreated/} ],
+warnings_are { $cal = Data::ICal->new(filename => 't/ics/version1.ics') }
+    [ {carped => "Unknown property for Data::ICal::Entry::Event: malarm"},
+    {carped => "Unknown property for Data::ICal::Entry::Event: dcreated"} ],
     "Got a warning for fake property set";
 ok((not $cal), "rejected calendar with version property value 1.0");
 
-warnings_like { $cal = Data::ICal->new(filename => 't/ics/test.ics', vcal10 => 1) }
-    [ {carped => qr/Unknown property for Data::ICal::Entry::Event: duration/} ],
+warnings_are { $cal = Data::ICal->new(filename => 't/ics/test.ics', vcal10 => 1) }
+    [ {carped => "Unknown property for Data::ICal::Entry::Event: duration"} ],
     "Got a warning for fake property set";
 ok((not $cal), "rejected calendar with version property value 2.0");
 

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list