From cb22ae6ff96e810d48ee6838d08cc673a0b79edd Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 26 Dec 2012 07:51:49 +0900 Subject: [PATCH] Supporting utf8 in edit-line. Still need to handle non-single-width characters properly. --- lib/chibi/term/edit-line.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/chibi/term/edit-line.scm b/lib/chibi/term/edit-line.scm index b7d50f9c..89fb5337 100644 --- a/lib/chibi/term/edit-line.scm +++ b/lib/chibi/term/edit-line.scm @@ -416,7 +416,7 @@ (cons '() (and (pair? o) (car o)))) (define (make-printable-keymap) - (let* ((keymap (make-keymap)) + (let* ((keymap (make-keymap command/self-insert)) (v (car keymap))) (do ((i #x20 (+ i 1))) ((= i #x7F) keymap) (vector-set! v i command/self-insert))))