Changeset 2432


Ignore:
Timestamp:
2001-05-17T00:57:03+12:00 (23 years ago)
Author:
say1
Message:

switched the order of removing the symbolic link and checking for errors so that an error condition wouldn"t leave a temporary file in the tmp directory

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/plugins/ConvertToPlug.pm

    r2327 r2432  
    174174    $output_type = `$cmd`;
    175175
     176    # remove symbolic link to original file
     177    &util::rm($tmp_filename);
     178
     179    # Check STDERR here
    176180    chomp $output_type;
    177181    if ($output_type eq "fail") {
    … …  
    179183    return "";
    180184    }
    181 
    182     # remove symbolic link to original file
    183     &util::rm($tmp_filename);
    184185
    185186    # store the *actual* output type and return the output filename
Note: See TracChangeset for help on using the changeset viewer.