Item1326: Tests should not only assert on failure - that gives an inc…

…orrect report on the number of passing tests

git-svn-id: http://svn.foswiki.org/trunk@8213 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

WysiwygPlugin/test/unit/WysiwygPlugin/TranslatorBase.pm

@@ -122,7 +122,10 @@ sub assert_tml_equals {
     $actual   ||= '';
     $actual   =~ s/\n$//s;
     $expected =~ s/\n$//s;
-    unless ( $expected eq $actual ) {
+    if ( $expected eq $actual ) {
+        $this->assert( 1 );
+    }
+    else {
         my $expl =
             "==$name== Expected TML:\n"
           . encode($expected)
@@ -158,6 +161,9 @@ sub assert_tml_not_equals {
           . "\n==$name==\n";
         $this->assert( 0, $expl . "\n" );
     }
+    else {
+        $this->assert( 1 );
+    }
 }
 
 1;