Changeset 36476 for trunk/pstamp/scripts
- Timestamp:
- Feb 5, 2014, 10:58:58 AM (12 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_checkdependent.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_checkdependent.pl
r36459 r36476 27 27 my $IPP_DIFF_MODE_STACK_STACK = 4; 28 28 29 my ($dep_id, $stage, $stage_id, $component, $imagedb, $ rlabel, $need_magic, $fault_count, $max_fault_count, $logfile);29 my ($dep_id, $stage, $stage_id, $component, $imagedb, $label, $rlabel, $need_magic, $fault_count, $max_fault_count, $logfile); 30 30 my ($dbname, $ps_dbserver, $verbose, $save_temps, $no_update); 31 31 … … 36 36 'component=s' => \$component, 37 37 'imagedb=s' => \$imagedb, # dbname for images lookups. 38 'rlabel=s' => \$rlabel, 38 'label=s' => \$label, # request's label 39 'rlabel=s' => \$rlabel, # pstampDependent.rlabel (deprecated) 39 40 'need_magic' => \$need_magic, 40 41 'fault_count=i' => \$fault_count, … … 72 73 $ipprc->redirect_output($logfile); 73 74 } 75 76 if ($label) { 77 # rlabel is deprecated. Use one based on the supplied label parameter which is the current label 78 # for the request, which may be different than the one given to the dependent when the job was parsed. 79 # XXX: having the convention that update label is 'ps_ud_' . $label of request embedded here 80 # (and formerly in pstampparse.pl) is not particularly clean but it's simple. 81 my $new_rlabel = 'ps_ud_' . $label; 82 if ($new_rlabel ne $rlabel) { 83 print "Notice: using $new_rlabel instead of $rlabel for update label.\n"; 84 $rlabel = $new_rlabel; 85 } 86 } 87 74 88 75 89 if (!$ps_dbserver) { … … 886 900 887 901 # Stop faulting components. With the death of magic the likelyhood that something is truly gone 888 # forever is much smaller. The false alarm rate due to temporary file system problemsis far too high902 # forever is much smaller. The false alarm rate is far too high 889 903 return; 890 904
Note:
See TracChangeset
for help on using the changeset viewer.
