Changeset 19589 for util

Show
Ignore:
Timestamp:
01/19/08 06:51:57 (10 months ago)
Author:
particle
Message:

[fudgeall] ignore previously fudged output files

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • util/fudgeall

    r19587 r19589  
    1616print join(' ', 
    1717    map { 
    18         chomp(my $pick = `$^X $top/util/fudge $platform $_`); 
    19         $pick; 
     18        my $pick; 
     19        if ( $_ !~ m/\.$platform$/ ) { 
     20            chomp( $pick = `$^X $top/util/fudge $platform $_` ); 
     21        } 
     22        defined $pick ? $pick : (); 
    2023    } @ARGV 
    2124), "\n"; 
     25 
     26