diff options
| -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}; |