diff options
| author | Stefan Kangas <skangas@skangas.se> | 2012-06-05 05:30:42 +0200 |
|---|---|---|
| committer | Stefan Kangas <skangas@skangas.se> | 2012-06-05 05:30:42 +0200 |
| commit | 471b9ce4fa7fca6491ccd3e1557637f09827f7ab (patch) | |
| tree | b9f68c5c3022bf0f4287ad772c92eb17778773d9 | |
| parent | f779c5034227750e7a500f79890dafd81b2a98bf (diff) | |
Fix a warning when searching with no query string specified
| -rw-r--r-- | lib/Fripost/Commands/alias_search.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lib/Fripost/Commands/alias_search.pm b/lib/Fripost/Commands/alias_search.pm index 6e638ac..01aed7f 100644 --- a/lib/Fripost/Commands/alias_search.pm +++ b/lib/Fripost/Commands/alias_search.pm @@ -29,10 +29,8 @@ sub perform_search { } sub main { - my $ldap = shift; - my $conf = shift; - - my $search = $_[0]; + my ($ldap, $conf, $search) = @_; + $search //= ''; my $f = $conf->{from}; my $g = $conf->{goto}; |