From 471b9ce4fa7fca6491ccd3e1557637f09827f7ab Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Tue, 5 Jun 2012 05:30:42 +0200 Subject: Fix a warning when searching with no query string specified --- lib/Fripost/Commands/alias_search.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'lib') 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}; -- cgit v1.2.3