[Jifty-commit] r3806 - in Test-WWW-Declare: lib/Test/WWW

[jifty-commit at lists.jifty.org]

Author: sartak
Date: Mon Aug  6 13:17:02 2007
New Revision: 3806

Modified:
   Test-WWW-Declare/   (props changed)
   Test-WWW-Declare/lib/Test/WWW/Declare.pm

Log:
 r29951 at caladan:  sartak | 2007-08-06 13:16:17 -0400
 fix error messages being reported negatively


Modified: Test-WWW-Declare/lib/Test/WWW/Declare.pm
==============================================================================
--- Test-WWW-Declare/lib/Test/WWW/Declare.pm	(original)
+++ Test-WWW-Declare/lib/Test/WWW/Declare.pm	Mon Aug  6 13:17:02 2007
@@ -165,8 +165,8 @@
     $args{negative} ||= 0;
 
     push @output, $args{name};
-    push @output, $args{positive} ? "does not"
-                                  : ();
+    push @output, $args{negative} ? ()
+                                  : "does not";
 
     if ($args{match} eq 'equality') {
         if ($args{case_insensitive}) {
@@ -175,8 +175,8 @@
             $args{expected} = lc $args{expected};
         }
 
-        push @output, $args{positive} ? "equal"
-                                      : "equals";
+        push @output, $args{negative} ? "equals"
+                                      : "equal";
         push @output, $orig->{expected};
 
         $match = $args{got} eq $args{expected};
@@ -188,8 +188,8 @@
             $args{expected} = lc $args{expected};
         }
 
-        push @output, $args{positive} ? "contain"
-                                      : "contains";
+        push @output, $args{negative} ? "contains"
+                                      : "contain";
         push @output, $orig->{expected};
 
         $match = index($args{got}, $args{expected}) >= 0;
@@ -201,8 +201,8 @@
             $args{expected} = "(?i:$args{expected})";
         }
 
-        push @output, $args{positive} ? "match"
-                                      : "matches";
+        push @output, $args{negative} ? "matches"
+                                      : "match";
         push @output, $orig->{expected};
 
         $match = $args{got} =~ $args{expected};