Changeset 15151


Ignore:
Timestamp:
03/29/08 17:43:46 (13 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:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/plugins/ConvertToPlug.pm

    r15116 r15151  
    273273    $tmp_dirname = &util::filename_cat($tmp_dirname, "tmp");
    274274    &util::mk_dir($tmp_dirname) if (!-e $tmp_dirname);
    275    
     275   
     276    # The following is not necessary and will cause problems with
     277    # replacing_srcdoc_with_html in the GSDLremote case:
    276278    # Remove any white space from filename -- no risk of name collision, and
    277279    # makes later conversion by utils simpler. Leave spaces in path...
    278280    # tidy up the filename with space, dot, hyphen between
    279     $tailname =~ s/\s+//g;
    280     $tailname =~ s/\.+//g;
    281     $tailname =~ s/\-+//g;
     281    #$tailname =~ s/\s+//g;
     282    #$tailname =~ s/\.+//g;
     283    #$tailname =~ s/\-+//g;
    282284
    283285    # convert to utf-8 otherwise we have problems with the doc.xml file
Note: See TracChangeset for help on using the changeset viewer.