Changeset 873

Timestamp:

11/23/08 10:54:30 (4 years ago)

Author:

CrawfordCurrie

Message:

Item175: not sure why this test decided not to work; looks like it was always wrong.

File:

• trunk/UnitTestContrib/test/unit/UTF8Tests.pm (modified) (2 diffs)

trunk/UnitTestContrib/test/unit/UTF8Tests.pm

@@ -12 +12 @@
 #
 package UTF8Tests;
-use base qw(FoswikiTestCase);
+use base qw(FoswikiFnTestCase);
 
 use strict;
 
 use Foswiki;
-
-sub set_up {
-}
-
-sub tear_down {
-}
 
 sub DISABLEtest_urlEncodeDecode {
@@ -315 +309 @@
 EOS
 
-    my $t = segfaulting_urlDecode($s);
+    my $t = $this->segfaulting_urlDecode($s);
 }
 
 sub segfaulting_urlDecode {
-    my $text = shift;
+    my ($this, $text) = @_;
 
     $text =~ s/%([\da-f]{2})/chr(hex($1))/gei;
     $text =~ s/%u([\da-f]{4})/chr(hex($1))/gei; 
 
-    my $t = Foswiki::UTF82SiteCharSet( $text ); 
+    my $t = $this->{twiki}->UTF82SiteCharSet( $text ); 
 
     $text = $t if ( $t );