equal
deleted
inserted
replaced
316 |
316 |
317 my $loff1 = $loff - 1; |
317 my $loff1 = $loff - 1; |
318 |
318 |
319 # Command line without extrema |
319 # Command line without extrema |
320 $cmd = qq[pcomb $pc0args $pc1args $picture $cpict]; |
320 $cmd = qq[pcomb $pc0args $pc1args $picture $cpict]; |
|
321 $cmd = qq[pcomb $pc0args $pc1args "$picture"]; |
|
322 if ($cpict) { |
|
323 $cmd .= qq[ "$cpict"]; |
|
324 } |
321 $cmd .= qq[ | pcompos $scolpic 0 0 +t .1 $slabinvpic 2 $loff1]; |
325 $cmd .= qq[ | pcompos $scolpic 0 0 +t .1 $slabinvpic 2 $loff1]; |
322 $cmd .= qq[ -t .5 $slabpic 0 $loff - $legwidth 0]; |
326 $cmd .= qq[ -t .5 $slabpic 0 $loff - $legwidth 0]; |
323 |
327 |
324 if ($doextrem == 1) { |
328 if ($doextrem == 1) { |
325 # Get min/max image luminance |
329 # Get min/max image luminance |