diff options
| -rwxr-xr-x | lib/Fripost/Prompt.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Fripost/Prompt.pm b/lib/Fripost/Prompt.pm index fbd39e6..50d2d51 100755 --- a/lib/Fripost/Prompt.pm +++ b/lib/Fripost/Prompt.pm @@ -67,8 +67,8 @@ sub prompt_if_undefined { my $rewrite; if (defined $must and $#$must >= 1 and $must->[0] eq 'rewrite') { - shift $must; - $rewrite = shift $must; + shift @$must; + $rewrite = shift @$must; } else { $rewrite //= sub { $_ }; |