From 0db3e0ed813ef3626b30e0f9382b07fb0e834b96 Mon Sep 17 00:00:00 2001
From: Juerd Waalboer <juerd@tnx.nl>
Date: Fri, 5 Jan 2024 23:40:46 +0100
Subject: [PATCH] Remove special cases for undef input

It's too buggy; in some edge cases it results in an infinite input loop
with 100% cpu. If you want to restart, use 'restart' instead of eof'ing
the input with ^D.
---
 plugins/restart | 9 ---------
 revbank         | 6 +++++-
 2 files changed, 5 insertions(+), 10 deletions(-)

diff --git a/plugins/restart b/plugins/restart
index 8e77f16..7f32d62 100644
--- a/plugins/restart
+++ b/plugins/restart
@@ -13,12 +13,3 @@ sub command :Tab(restart) ($self, $cart, $command, @) {
 
     return ABORT, "exec() failed. You'll have to restart revbank yourself :P";
 }
-
-sub hook_input($class, $cart, $input, $split_input, @) {
-    return if defined $input;
-
-    call_hooks("restart_restart");
-    no warnings qw(exec);
-    exec $0;
-    call_hooks("restart_survived");
-}
diff --git a/revbank b/revbank
index b991557..4fdbb7a 100755
--- a/revbank
+++ b/revbank
@@ -18,7 +18,7 @@ use RevBank::Messages;
 use RevBank::Cart;
 use RevBank::Prompt;
 
-our $VERSION = "5.1.1";
+our $VERSION = "5.1.2";
 our %HELP1 = (
     "abort" => "Abort the current transaction",
 );
@@ -112,6 +112,10 @@ OUTER: for (;;) {
             my $input = RevBank::Prompt::prompt(
                 $prompt, \@completions, $default, $pos, $cart, \@plugins
             );
+            if (not defined $input) {
+                # Controlling terminal gone
+                exit if eof STDIN;
+            }
 
             call_hooks "input", $cart, $input, $split_input;