Item175: not sure why this test decided not to work; looks like it wa…

…s always wrong.

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

UnitTestContrib/test/unit/UTF8Tests.pm

@@ -11,18 +11,12 @@
 # to have to work out how to re-initialise Foswiki for each test)
 #
 package UTF8Tests;
-use base qw(FoswikiTestCase);
+use base qw(FoswikiFnTestCase);
 
 use strict;
 
 use Foswiki;
 
-sub set_up {
-}
-
-sub tear_down {
-}
-
 sub DISABLEtest_urlEncodeDecode {
     my $this = shift;
     my $s = '';
@@ -314,16 +308,16 @@ zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz
 
 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 );