picolisp

commit a3a9cda6394821d92d47854d37069e6f5fc14925
parent 00b73207b6cca8c3c260535faf0a28c7ca9d4bcd
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri, 23 Nov 2012 15:04:24 +0100

(not limited to 'xterm')
Diffstat:
M
lib/led.l
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/led.l b/lib/led.l
@@ -392,7 +392,7 @@
             (cons (cons Key Prg) (delete @ "FKey")) )
          (T (cons (cons Key Prg) "FKey")) ) ) )
 
-(when (= "xterm" (sys "TERM"))  # Hardcoded (because 'tput' gives wrong codes)
+(when (sys "TERM")
    (fkey "^[[A" (uMove))  # Is CSI portable enough?
    (fkey "^[[B" (dMove))
    (fkey "^[[C" (rMove))