Changeset 15151 for gsdl

Timestamp:

2008-03-29T17:43:46+13:00 (16 years ago)

Author:

ak19

Message:

Commented out regular expressions that remove periods, hyphens and spaces from filenames to be converted. Need to retain the same output filename as was input

File:

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

gsdl/trunk/perllib/plugins/ConvertToPlug.pm

@@ -273 +273 @@
     $tmp_dirname = &util::filename_cat($tmp_dirname, "tmp");
     &util::mk_dir($tmp_dirname) if (!-e $tmp_dirname);
-    
+   
+    # The following is not necessary and will cause problems with
+    # replacing_srcdoc_with_html in the GSDLremote case:
     # Remove any white space from filename -- no risk of name collision, and
     # makes later conversion by utils simpler. Leave spaces in path...
     # tidy up the filename with space, dot, hyphen between
-    $tailname =~ s/\s+//g; 
-    $tailname =~ s/\.+//g;
-    $tailname =~ s/\-+//g;
+    #$tailname =~ s/\s+//g; 
+    #$tailname =~ s/\.+//g;
+    #$tailname =~ s/\-+//g;
 
     # convert to utf-8 otherwise we have problems with the doc.xml file