aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Kangas <skangas@skangas.se>2012-06-05 05:30:42 +0200
committerStefan Kangas <skangas@skangas.se>2012-06-05 05:30:42 +0200
commit471b9ce4fa7fca6491ccd3e1557637f09827f7ab (patch)
treeb9f68c5c3022bf0f4287ad772c92eb17778773d9
parentf779c5034227750e7a500f79890dafd81b2a98bf (diff)
Fix a warning when searching with no query string specified
-rw-r--r--lib/Fripost/Commands/alias_search.pm6
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};