Permalink
Browse files

only 256 characters

Whoops.  Stop adding latin1 characters at char-code 255.

darcs-hash:20060317213650-30503-1eb18e69049e72a279832284157acc3ceb62df53.gz
  • Loading branch information...
csrhodes committed Mar 17, 2006
1 parent 0d309f6 commit 8758eeac5de943def274663df5ba43014f6b05b6
Showing with 1 addition and 1 deletion.
  1. +1 −1 keysyms.lisp
View
@@ -175,7 +175,7 @@
#+sbcl
(progn
(do ((i 160 (+ i 1)))
- ((> i 256))
+ ((>= i 256))
(if (or (<= #xc0 i #xd6)
(<= #xd8 i #xde))
(define-keysym (code-char i) i :lowercase (+ i 32))

0 comments on commit 8758eea

Please sign in to comment.