Index: trunk/ippScripts/scripts/magic_definerun.pl
===================================================================
--- trunk/ippScripts/scripts/magic_definerun.pl	(revision 20689)
+++ trunk/ippScripts/scripts/magic_definerun.pl	(revision 20731)
@@ -31,9 +31,10 @@
 
 # Parse the command-line arguments
-my ($exp_id, $warp_id, $workdir, $dbname, $save_temps, $verbose);
+my ($exp_id, $warp_id, $min_diff_id, $workdir, $dbname, $save_temps, $verbose);
 
 GetOptions(
            'exp_id=s'        => \$exp_id,     # exposure identifier
            'warp_id=s'       => \$warp_id,    # warp identifier
+           'min_diff_id=s'   => \$min_diff_id, # minimum diff id to consider
            'dbname=s'        => \$dbname,     # Database name
            'workdir=s'       => \$workdir,    # workdir
@@ -108,5 +109,5 @@
 print "$num_skyfiles skyfiles found for $exp_id\n" if $verbose;
 
-if ($warp_id) {
+if ($warp_id or $min_diff_id) {
     # filter the inputs
     my $i = 0;
@@ -114,8 +115,14 @@
         my $keep = 1;
         my $sf = $inputs->[$i];
-        my $this_warp_id = $sf->{warp_id_temp_0};
-
-        if ($warp_id ne $this_warp_id) {
-            $keep = 0;
+
+        if ($warp_id) {
+            if ($warp_id ne $sf->{warp_id_temp_0}) {;
+                $keep = 0;
+            }
+        }
+        if ($min_diff_id) {
+            if ($sf->{diff_id} < $min_diff_id) {
+                $keep = 0;
+            }
         }
         if ( $keep) {