iAdd k/j keys for up/down movement - 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 2a9700e028977ef5084d346c324bcd0e1871298d /ckeen/repos/holymoly/commit/2a9700e028977ef5084d346c324bcd0e1871298d.gph vernunftzentrum.de 70 1parent c2f407fa69fbf96d6f662c9fda2e07a2e241e849 /ckeen/repos/holymoly/commit/c2f407fa69fbf96d6f662c9fda2e07a2e241e849.gph vernunftzentrum.de 70 hAuthor: Christian Kellermann URL:mailto:ckeen@pestilenz.org vernunftzentrum.de 70 iDate: Wed, 12 Dec 2018 13:58:13 +0100 Err vernunftzentrum.de 70 i Err vernunftzentrum.de 70 iAdd k/j keys for up/down movement Err vernunftzentrum.de 70 i Err vernunftzentrum.de 70 iDiffstat: Err vernunftzentrum.de 70 i holymoly.scm | 4 ++-- Err vernunftzentrum.de 70 i Err vernunftzentrum.de 70 i1 file changed, 2 insertions(+), 2 deletions(-) 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@@ -99,11 +99,11 @@ Err vernunftzentrum.de 70 i (draw (cdr l) (add1 i)))) Err vernunftzentrum.de 70 i (wrefresh win) Err vernunftzentrum.de 70 i (loop (case (char->integer (getch)) Err vernunftzentrum.de 70 i- ((16 #x103) ; arrow up Err vernunftzentrum.de 70 i+ ((16 #x103 107) ; arrow up / k Err vernunftzentrum.de 70 i (cond Err vernunftzentrum.de 70 i (use-cursor (prev-cursor! cursor) newp) Err vernunftzentrum.de 70 i (else (if (zero? newp) 0 (sub1 newp))))) Err vernunftzentrum.de 70 i- ((14 #x102) ; arrow down Err vernunftzentrum.de 70 i+ ((14 #x102 106) ; arrow down / j Err vernunftzentrum.de 70 i (cond Err vernunftzentrum.de 70 i (use-cursor (next-cursor! cursor) newp) Err vernunftzentrum.de 70 i (else (if (= newp nlines) newp (add1 newp))))) Err vernunftzentrum.de 70 .