Changeset 28381
- Timestamp:
- 2013-10-10T14:39:22+13:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/ConvertBinaryFile.pm
r27509 r28381 258 258 my $tmp_filename = &FileUtils::filenameConcatenate($tmp_dirname, "$utf8_tailname$lc_suffix"); 259 259 260 # If gsdl is remote, we're given relative path to input file, of the form import/ tailname.suffix260 # If gsdl is remote, we're given relative path to input file, of the form import/utf8_tailname.suffix 261 261 # But we can't softlink to relative paths. Therefore, we need to ensure that 262 262 # the input_filename is the absolute path, see http://perldoc.perl.org/File/Spec.html … … 327 327 # running under windows 328 328 if ($ENV{'GSDLOS'} =~ /^windows$/i) { 329 $output_filename = $tmp_dirname . "\\$ tailname\\" . $tailname . ".$output_type";329 $output_filename = $tmp_dirname . "\\$utf8_tailname\\" . $utf8_tailname . ".$output_type"; 330 330 } else { 331 $output_filename = $tmp_dirname . "\/$ tailname\/" . $tailname . ".$output_type";331 $output_filename = $tmp_dirname . "\/$utf8_tailname\/" . $utf8_tailname . ".$output_type"; 332 332 } 333 333 } else {
Note:
See TracChangeset
for help on using the changeset viewer.