Changeset 86

Show
Ignore:
Timestamp:
04.12.2006 16:11:37 (2 years ago)
Author:
jorge
Message:

Add arguments only if they exist (just in case)

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/devel/FuzzyOcr/Scanset.pm

    r76 r86  
    2929    my $stdin = undef; 
    3030    my $stdout = undef; 
    31     my $args = $self->{args}; 
    3231    my $rcmd = $self->{command}; 
    3332 
    …… 
    3736        $rcmd = $conf->{$t} if defined $conf->{$t}; 
    3837    } 
    39      
    40     $rcmd .= ' ' . $args; 
     38    if (defined $self->{args}) { 
     39        $rcmd .= ' ' . $self->{args}; 
     40    } 
    4141 
    4242    # First, run all preprocessors 
    4343    my $preprocessors = $self->{preprocessors}; 
    44     if ($preprocessors) { 
     44        if ($preprocessors) { 
    4545        $preprocessors =~ s/ //g; 
    4646        my @prep = split(',', $preprocessors);