From 976a1b137de108719037d01392a4b0703ae73b24 Mon Sep 17 00:00:00 2001
From: Skylar <skylar@sanderson.home>
Date: Sat, 4 Nov 2023 11:47:29 -0500
Subject: [PATCH] Insert, rather than change, characters in insert mode

---
 sloth/editor.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sloth/editor.scm b/sloth/editor.scm
index 6db469c..00f7dab 100644
--- a/sloth/editor.scm
+++ b/sloth/editor.scm
@@ -38,7 +38,7 @@
    ((eqv? key KEY_DOWN)
         (move win (+ y 1) x))
    ((eqv? key #\esc) #:normal-mode)
-   (else (echochar win (normal key)))))
+   (else (insch win (normal key) #:y y #:x (+ x 1)))))
 
 (define (normal-mode-process-input win key)
   (define y (getcury win))