iEnable CTRL-U to delete input in dialogs - holymoly - A tor enabled gopher client written in CHICKEN scheme	Err	vernunftzentrum.de	70
hgit clone git://vernunftzentrum.de/holymoly.git	URL:git://vernunftzentrum.de/holymoly.git	vernunftzentrum.de	70
1Log	/ckeen/repos/holymoly/log.gph	vernunftzentrum.de	70
1Files	/ckeen/repos/holymoly/files.gph	vernunftzentrum.de	70
1Refs	/ckeen/repos/holymoly/refs.gph	vernunftzentrum.de	70
1README	/ckeen/repos/holymoly/file/README.gph	vernunftzentrum.de	70
1LICENSE	/ckeen/repos/holymoly/file/LICENSE.gph	vernunftzentrum.de	70
i---	Err	vernunftzentrum.de	70
1commit fb810a280878b4732fb0f0547d03fd8fac24bcef	/ckeen/repos/holymoly/commit/fb810a280878b4732fb0f0547d03fd8fac24bcef.gph	vernunftzentrum.de	70
1parent 2e0a144bd6c14b237e97a7844cda4d80111544e2	/ckeen/repos/holymoly/commit/2e0a144bd6c14b237e97a7844cda4d80111544e2.gph	vernunftzentrum.de	70
hAuthor: Christian Kellermann <ckeen@pestilenz.org>	URL:mailto:ckeen@pestilenz.org	vernunftzentrum.de	70
iDate:   Tue, 24 Apr 2018 10:52:55 +0200	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
iEnable CTRL-U to delete input in dialogs	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
iDiffstat:	Err	vernunftzentrum.de	70
i  holymoly.scm                        |       3 ++-	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
i1 file changed, 2 insertions(+), 1 deletion(-)	Err	vernunftzentrum.de	70
i---	Err	vernunftzentrum.de	70
1diff --git a/holymoly.scm b/holymoly.scm	/ckeen/repos/holymoly/file/holymoly.scm.gph	vernunftzentrum.de	70
i@@ -128,11 +128,12 @@	Err	vernunftzentrum.de	70
i         (wrefresh w))	Err	vernunftzentrum.de	70
i       (refresh r)	Err	vernunftzentrum.de	70
i       (let ((input (getch)))	Err	vernunftzentrum.de	70
i-        (case (char->integer input)	Err	vernunftzentrum.de	70
i+        (select (char->integer input)	Err	vernunftzentrum.de	70
i           ((10) (delwin w) (list->string (reverse r)))	Err	vernunftzentrum.de	70
i           ((263) (let ((new (if (null? r) r (cdr r))))	Err	vernunftzentrum.de	70
i                    (refresh new)	Err	vernunftzentrum.de	70
i                    (input-loop new)))	Err	vernunftzentrum.de	70
i+          ((list (bitwise-and 31 85)) (refresh '()) (input-loop '())) ; CTRL-U	Err	vernunftzentrum.de	70
i           ((27) suggestion)	Err	vernunftzentrum.de	70
i           (else	Err	vernunftzentrum.de	70
i            (refresh (cons input r))	Err	vernunftzentrum.de	70
.