Changeset 24600 for main/trunk/greenstone2/perllib/convertutil.pm
- Timestamp:
- 2011-09-15T16:31:11+12:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/convertutil.pm
r22469 r24600 175 175 if ($command_status != 0) { 176 176 $had_error = 1; 177 178 print $outhandle "Error: processing command failed. Exit status $?\n"; 177 178 # for imagemagick commands that go via gs-magick.pl, need to shift exit code by 8 and then 179 # convert to its signed value to get the actual exit code that imagemagick had emitted. 180 my $signed_cmd_status = $command_status; 181 $signed_cmd_status >>= 8; 182 $signed_cmd_status = (($signed_cmd_status & 0x80) ? -(0x100 - ($signed_cmd_status & 0xFF)) : $signed_cmd_status); 183 184 print $outhandle "Error: processing command failed. Exit status $command_status (signed value: $signed_cmd_status)\n"; 179 185 180 186 if ($verbosity >= 3) {
Note:
See TracChangeset
for help on using the changeset viewer.