Changeset 16933 for gsdl/trunk/perllib/unicode.pm

Timestamp:

2008-08-21T11:34:41+12:00 (16 years ago)

Author:

ak19

Message:

Doodoo. Forgot to return the modified strings from new subroutines filename_to_url and url_to_filename. No wonder things broke suddenly

File:

• gsdl/trunk/perllib/unicode.pm (modified) (2 diffs)

gsdl/trunk/perllib/unicode.pm

@@ -604 +604 @@
     my ($text) =@_;
     $text =~ s/%25/%/g;
+    return $text;
 }
 
@@ -620 +621 @@
     $text =~ s/%/%25/g;
     }
+    return $text;
 }