diff --git a/revbank b/revbank index 068e84d..7c0c1ac 100755 --- a/revbank +++ b/revbank @@ -51,7 +51,7 @@ sub prompt { my @matches; $readline->Attribs->{completion_entry_function} = sub { - my ($word, $state) = @_; + my ($word, $state) = @_; @matches = grep /^\Q$word\E/i, @completions if $state == 0; return shift @matches; };