From: <cra...@us...> - 2003-05-10 14:12:38
|
Update of /cvsroot/twikiplugins/twikiplugins/ActionTrackerPlugin/lib/TWiki/Plugins/ActionTrackerPlugin/test In directory sc8-pr-cvs1:/tmp/cvs-serv2006/ActionTrackerPlugin/lib/TWiki/Plugins/ActionTrackerPlugin/test Modified Files: Assert.pm ExtendedActionSetTests.pm Log Message: Release candidate 1 for 10 May release Index: Assert.pm =================================================================== RCS file: /cvsroot/twikiplugins/twikiplugins/ActionTrackerPlugin/lib/TWiki/Plugins/ActionTrackerPlugin/test/Assert.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** Assert.pm 8 May 2003 20:55:33 -0000 1.4 --- Assert.pm 10 May 2003 14:12:35 -0000 1.5 *************** *** 106,109 **** --- 106,112 ---- $i++; } + if ($pass){ + $pass = ($i == length($saw) && $i == length($exp)) ? 1 : 0; + } } assert($pass, *************** *** 125,130 **** assert($test eq "", "saw \"$test\" expected \"\""); } ! my $re = unregex($expected); ! my $pass = $test =~ m/^$re$/s ? 1 : 0; _assertMismatch($pass, $test, $expected); } --- 128,132 ---- assert($test eq "", "saw \"$test\" expected \"\""); } ! my $pass = ($test eq $expected) ? 1 : 0; _assertMismatch($pass, $test, $expected); } Index: ExtendedActionSetTests.pm =================================================================== RCS file: /cvsroot/twikiplugins/twikiplugins/ActionTrackerPlugin/lib/TWiki/Plugins/ActionTrackerPlugin/test/ExtendedActionSetTests.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ExtendedActionSetTests.pm 8 May 2003 20:56:22 -0000 1.1 --- ExtendedActionSetTests.pm 10 May 2003 14:12:35 -0000 1.2 *************** *** 43,47 **** my $fmt = new ActionTrackerPlugin::Format("|AP|","|\$ap|","\$ap"); my $s = $chosen->formatAsString($fmt); ! Assert::sEquals($s,"2\n\$ap\n"); } } --- 43,47 ---- my $fmt = new ActionTrackerPlugin::Format("|AP|","|\$ap|","\$ap"); my $s = $chosen->formatAsString($fmt); ! Assert::sEquals($s,"2\n\n"); } } |