Changeset 13879
- Timestamp:
- 2007-02-08T16:35:38+13:00 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/ImagePlug.pm
r13542 r13879 158 158 my $type = "unknown"; 159 159 160 161 if ($converttotype ne "" && $filename =~ m/$converttotype$/) { 162 160 if ($converttotype ne "" && $filename !~ m/$converttotype$/) { 163 161 $originalfilename = $filename; 164 162 $filename = &util::get_tmp_filename() . ".$converttotype"; … … 172 170 173 171 $type = $converttotype; 172 $file =~ s/\..*$/\.$type/; 174 173 } 175 174
Note:
See TracChangeset
for help on using the changeset viewer.