Changeset 137
- Timestamp:
- Mar 31, 2014, 5:55:48 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/klask
r136 r137 708 708 709 709 my $ret = GetOptions( 710 'kind ' => \$kind,710 'kind=s' => \$kind, 711 711 ); 712 713 if714 712 715 713 my %possible_search = ( … … 718 716 ); 719 717 720 $ search= 'host' if not defined $possible_search{$kind};718 $kind = 'host' if not defined $possible_search{$kind}; 721 719 722 720 $possible_search{$kind}->(@ARGV);
Note: See TracChangeset
for help on using the changeset viewer.