Changeset 28471 for gs2-extensions

Show
Ignore:
Timestamp:
16.10.2013 17:58:00 (6 years ago)
Author:
davidb
Message:

Change to use new java support methods in util.pm to help operation under Cygwin

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs2-extensions/music-ir-src/trunk/perllib/plugins/jAudioExtractor.pm

    r28396 r28471  
    3131use Cwd; 
    3232 
    33 use FileUtil; 
     33use FileUtils; 
    3434 
    3535use strict; 
     
    105105 
    106106    my $ace_xml_output_directory = &util::filename_cat($gsdl_home,"tmp"); # Set the directory to save the the ACE XML output files in 
    107     if (!FileUtil::directoryExists($ace_xml_output_directory)) { 
    108     FileUtil::makeDirectory($ace_xml_output_directory); 
     107    if (!FileUtils::directoryExists($ace_xml_output_directory)) { 
     108    FileUtils::makeDirectory($ace_xml_output_directory); 
    109109    } 
    110110    $self->{'ace_xml_output_directory'} = $ace_xml_output_directory; 
     
    251251    my $batch_file_path_os = $batch_file_path; 
    252252 
    253     if ($^O eq "cygwin") { 
    254         $batch_file_path_os = `cygpath -w "$batch_file_path"`; 
    255         $batch_file_path_os =~ s/\s+$//; 
    256     } 
     253    $batch_file_path_os = &util::makeFilenameJavaCygwinCompatible($batch_file_path_os); 
     254#   if ($^O eq "cygwin") { 
     255#       $batch_file_path_os = `cygpath -w "$batch_file_path"`; 
     256#       $batch_file_path_os =~ s/\s+$//; 
     257#   } 
    257258 
    258259    my $jaudio_cmd = "java -Xmx1024M -jar jAudio.jar $convert_options -b \"$batch_file_path_os\"";