Changeset 18409

Show
Ignore:
Timestamp:
21.01.2009 16:27:41 (11 years ago)
Author:
ak19
Message:

Need to replace character ref for underscore with underscore again for the doc.xml's URL metadata, otherwise links in HTML files referring to other HTML files whose filenames contain underscores won't work.

Files:
1 modified

Legend:

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

    r18404 r18409  
    710710    my ($tailname,$dirname,$suffix) = &File::Basename::fileparse($file, "\\.[^\\.]+\$"); 
    711711    my $utf8_file = $self->filename_to_utf8_metadata($file); 
     712    $utf8_file =~ s/&\#095;/_/g; 
    712713    my $web_url = "http://"; 
    713714    if(defined $dirname) { # local directory