Changeset 22703 for gs2-extensions/pdf-box

Timestamp:

2010-08-21T23:27:08+12:00 (14 years ago)

Author:

davidb

Message:

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

File:

• gs2-extensions/pdf-box/trunk/perllib/plugins/PDFBoxConverter.pm (modified) (2 diffs)

gs2-extensions/pdf-box/trunk/perllib/plugins/PDFBoxConverter.pm

@@ -148 +148 @@
     return 0 if ( !-f $source_file_full_path);
 
+    my $outhandle = $self->{'outhandle'};
+    my $verbosity = $self->{'verbosity'};
+
     my $source_file_no_path = &File::Basename::basename($source_file_full_path);
     # Determine the full name and path of the output file
@@ -170 +173 @@
     $convert_cmd .= " \"$source_file_full_path\" \"$target_file_path\"";
 
-    # print STDERR "**** convert_command = $convert_cmd\n";
+    if ($verbosity>2) {
+    print $outhandle "Convert command: $convert_cmd\n";
+    }
 
     my $print_info = { 'message_prefix' => "PDFBox Conversion",