picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE
commit d539814554f49f82bacc63399e8be99499b0259f
parent f131afdb681b14eff15cb855a6571f5580bc2faa
Author: Alexander Burger <abu@software-lab.de>
Date:   Mon, 26 Nov 2012 16:05:45 +0100

Line editing cont.
Diffstat:

Mlib/led.l | 2+-


1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/led.l b/lib/led.l
@@ -298,7 +298,7 @@
             (loop
                (NIL
                   (make
-                     (while (and (setq "C" (key 50)) (<> "C" "^["))
+                     (while (and (setq "C" (key 100)) (<> "C" "^["))
                         (link "C") ) )
                   (off "Insert")
                   (lMove) )