From 3ce1874d3a20d028f6b0656dec0a3b18091bf332 Mon Sep 17 00:00:00 2001
From: Juerd Waalboer <juerd@tnx.nl>
Date: Fri, 23 Mar 2018 01:21:25 +0100
Subject: [PATCH] Reset idle timer on character input

Requested by peterbjornx
---
 revbank | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/revbank b/revbank
index fac65c7..170bd9f 100755
--- a/revbank
+++ b/revbank
@@ -64,10 +64,13 @@ sub prompt {
         $input = shift;
         $readline->callback_handler_remove;
     });
-    
+
     my $begin = my $time = time;
-    while (not $done) { 
-        $readline->callback_read_char if $select->can_read(.05);
+    while (not $done) {
+        if ($select->can_read(.05)) {
+            $readline->callback_read_char;
+            $begin = $time;
+        }
         if (time > $time) {
             $time = time;
             call_hooks(