Changeset 137


Ignore:
Timestamp:
Mar 31, 2014, 5:55:48 PM (11 years ago)
Author:
g7moreau
Message:
  • Stupid error
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/klask

    r136 r137  
    708708
    709709   my $ret = GetOptions(
    710       'kind'   => \$kind,
     710      'kind=s'   => \$kind,
    711711      );
    712 
    713    if
    714712
    715713   my %possible_search = (
     
    718716      );
    719717
    720    $search = 'host' if not defined $possible_search{$kind};
     718   $kind = 'host' if not defined $possible_search{$kind};
    721719
    722720   $possible_search{$kind}->(@ARGV);
Note: See TracChangeset for help on using the changeset viewer.