Changeset 19540

Show
Ignore:
Timestamp:
20.05.2009 11:52:59 (10 years ago)
Author:
mdewsnip
Message:

Fixed bug causing -converttotype to be completely broken.

Files:
1 modified

Legend:

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

    r19483 r19540  
    194194    #    $doc_obj->add_utf8_metadata($section, "Image", $utf8_filename_meta); 
    195195 
    196     my ($result,$filename_full_path)  
     196    my ($result, $converted_filename_full_path) 
    197197        = $self->convert($filename_full_path, $converttotype, "", "CONVERTTYPE"); 
    198198 
    199199    $type = $converttotype; 
     200    $filename_full_path = $converted_filename_full_path; 
    200201    $filename_no_path = "$filehead.$type"; 
    201202    $url_to_filename_no_path = "$url_to_filehead.$type";