Changeset 16953

Show
Ignore:
Timestamp:
21.08.2008 16:32:06 (11 years ago)
Author:
ak19
Message:

Associated file names are url-encoded

Files:
1 modified

Legend:

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

    r16392 r16953  
    138138    my $assoc_field = $self->{'assoc_field'} || "unknown_file"; 
    139139 
    140     $doc_obj->associate_file($filename_full_path, $filename_no_path, $mime_type, $section); 
     140    # The assocfilename is the url-encoded version of the utf8 filename 
     141    my $assoc_file = $doc_object->get_assocfile_from_sourcefile(); 
     142 
     143    $doc_obj->associate_file($filename_full_path, $assoc_file, $mime_type, $section); 
    141144    $doc_obj->add_metadata ($section, "FileFormat", $file_format); 
    142145    $doc_obj->add_metadata ($section, "MimeType", $mime_type);