Changeset 5765

Timestamp:

2003-10-29T17:49:22+13:00 (21 years ago)

Author:

mdewsnip

Message:

Commented out check for spaces in filenames - why is it there?? Instead the spaces are converted to "%20"s.

File:

• trunk/gsdl/perllib/plugins/UnknownPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/UnknownPlug.pm

@@ -131 +131 @@
     return 0 if ($file eq "" || $filename eq "");
 
-    if ($filename =~ m/ /) {
-    print $outhandle "UnknownPlug: \"$filename\" contains a space. choking.\n";
-    return undef;
-    }
+    # if ($filename =~ m/ /) {
+    # print $outhandle "UnknownPlug: \"$filename\" contains a space. choking.\n";
+    # return undef;
+    # }
+
+    # Escape spaces in the filename
+    $filename =~ s/ /%20/g;
+    $file =~ s/ /%20/g;
 
     # Add the file as an associated file ...