Changeset 22703

Show
Ignore:
Timestamp:
21.08.2010 23:27:08 (9 years ago)
Author:
davidb
Message:

Tidied up printing of command run to conditionally displayed based on verbosity level

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs2-extensions/pdf-box/trunk/perllib/plugins/PDFBoxConverter.pm

    r22700 r22703  
    148148    return 0 if ( !-f $source_file_full_path); 
    149149 
     150    my $outhandle = $self->{'outhandle'}; 
     151    my $verbosity = $self->{'verbosity'}; 
     152 
    150153    my $source_file_no_path = &File::Basename::basename($source_file_full_path); 
    151154    # Determine the full name and path of the output file 
     
    170173    $convert_cmd .= " \"$source_file_full_path\" \"$target_file_path\""; 
    171174 
    172     # print STDERR "**** convert_command = $convert_cmd\n"; 
     175    if ($verbosity>2) { 
     176    print $outhandle "Convert command: $convert_cmd\n"; 
     177    } 
    173178 
    174179    my $print_info = { 'message_prefix' => "PDFBox Conversion",