=================================================================== RCS file: /cvs/todotxt/Text-Todo/t/dudelicious.t,v retrieving revision 1.8 retrieving revision 1.9 diff -u -r1.8 -r1.9 --- todotxt/Text-Todo/t/dudelicious.t 2010/05/01 23:38:24 1.8 +++ todotxt/Text-Todo/t/dudelicious.t 2010/05/05 02:24:20 1.9 @@ -1,5 +1,5 @@ #!perl -# $AFresh1: dudelicious.t,v 1.7 2010/04/30 06:18:33 andrew Exp $ +# $AFresh1: dudelicious.t,v 1.8 2010/05/01 22:38:24 andrew Exp $ use Test::More; # tests => 3; use strict; @@ -66,7 +66,7 @@ 'Check JSON content' ); } else { - $t->content_is( $content, 'Check content' ); + $t->content_like( qr/\Q$content\E/xms, 'Check content' ); } } }