- Timestamp:
- 2012-04-27T17:13:40+12:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs2-extensions/pdf-box/trunk/java/perllib/plugins/PDFBoxConverter.pm
r25498 r25500 30 30 use strict; 31 31 no strict 'refs'; # allow filehandles to be variables and viceversa 32 no strict 'subs'; # allow barewords (eg STDERR) as function arguments 32 33 33 34 use gsprintf 'gsprintf'; … … 54 55 55 56 if (!-e $pbajar) { 56 print STDERR "Failed to find $pbajar\n";57 &gsprintf(STDERR,"**** Failed to find $pbajar\n"); 57 58 $pdfbox_conversion_available = 0; 58 59 $no_pdfbox_conversion_reason = "gextpdfboxjarnotinstalled"; … … 78 79 79 80 if ($status != 0) { 80 print STDERR "Testing for java\n"; 81 print STDERR "Failed to run: $cmd\n"; 82 print STDERR "$!\n"; 81 82 my $error_message = "**** Testing for java\n"; 83 $error_message .= "Failed to run: $cmd\n"; 84 $error_message .= "Error variable: |$!| and status: $status\n"; 85 86 &gsprintf(STDERR, "PDFBoxConverter: $error_message"); 87 83 88 $pdfbox_conversion_available = 0; 84 89 $no_pdfbox_conversion_reason = "couldnotrunjava"; … … 192 197 193 198 if ($verbosity>2) { 194 print $outhandle "Convert command: $convert_cmd\n";199 &gsprintf($outhandle,"Convert command: $convert_cmd\n"); 195 200 } 196 201
Note:
See TracChangeset
for help on using the changeset viewer.