Subversion Repositories DevTools

Rev

Rev 347 | Rev 5710 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 347 Rev 4928
Line 117... Line 117...
117
    #   Strip off any leading options
117
    #   Strip off any leading options
118
    #
118
    #
119
    my $just_collect;
119
    my $just_collect;
120
    foreach ( @_ )
120
    foreach ( @_ )
121
    {
121
    {
-
 
122
        # Ignore undefined item on the command line.
-
 
123
        # Makes use of ternary operators, for optional items, easier
-
 
124
        next unless defined $_;
-
 
125
 
122
        if ( $just_collect ) {
126
        if ( $just_collect ) {
123
            push @cmd, $_;
127
            push @cmd, $_;
124
            next;
128
            next;
125
 
129
 
126
        } elsif ( m/^--Show/ ) {
130
        } elsif ( m/^--Show/ ) {