Changeset 24193 for trunk/ippScripts/scripts/ipp_serial_mops.pl

Timestamp:

May 14, 2009, 5:32:30 PM (17 years ago)

Author:

Paul Price

Message:

Make errors with a skycell non-fatal.

File:

• trunk/ippScripts/scripts/ipp_serial_mops.pl (modified) (3 diffs)

trunk/ippScripts/scripts/ipp_serial_mops.pl

@@ -15 +15 @@
 use PS::IPP::Metadata::List qw( parse_md_list );
 use PS::IPP::Config qw( caturi );
+use Carp qw( carp );
 
 # Look for programs we need
@@ -137 +138 @@
 
         my $input = $ipprc->filename($sources, $path_base);
-        die "Can't find $input\n" unless $ipprc->file_exists($input);
+        (carp "Can't find $input\n" and next) unless $ipprc->file_exists($input);
         $input = $ipprc->file_resolve($input);
 
@@ -147 +148 @@
             my $command = "$mops --input $input --extname SkyChip.psf --output $output";
             my $success = run( command => $command, verbose => $verbose );
-            die "Couldn't translate $input\n" unless $success;
+            (carp "Couldn't translate $input\n" and next) unless $success;
         }