From 382940bfc98bbb10700f83f7ca0122e12e9c5fd3 Mon Sep 17 00:00:00 2001 From: Juerd Waalboer Date: Mon, 30 Jan 2023 06:12:23 +0100 Subject: [PATCH] Show unmodified input in error message --- revbank | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/revbank b/revbank index 286e882..aac9cf3 100755 --- a/revbank +++ b/revbank @@ -194,7 +194,7 @@ OUTER: for (;;) { redo PROMPT if not @words; abort if grep $_ eq 'abort', @words; - my $word = shift @words; + my $origword = my $word = shift @words; push @retry, $word; PLUGIN: for my $plugin (@plugins) { @@ -248,7 +248,7 @@ OUTER: for (;;) { call_hooks "plugin_fail", $plugin->id, "Invalid return value"; abort; } - call_hooks "invalid_input", $cart, $word; + call_hooks "invalid_input", $cart, $origword, $word; @retry = (); abort if @words; redo OUTER;