(no commit message)

diff --git a/gacela_events.lisp b/gacela_events.lisp
index 5e54fc7f473ad79403818accf36160a7bd9065f9..f9405538e365a3859cfbfd2f67bf3844ca748974 100644 (file)
--- a/gacela_events.lisp
+++ b/gacela_events.lisp
@@ -121,8 +121,46 @@
     (clrhash released)))
 
 (let ((keys
-       '((269 . minus)
-        (270 . plus)
+       '((8 . backspace)
+        (9 . tab)
+        (12 . clear)
+        (13 . return)
+        (19 . pause)
+        (27 . escape)
+        (32 . space)
+        (33 . exclaim)
+        (34 . quotedbl)
+        (35 . hash)
+        (36 . dollar)
+        (38 . ampersand)
+        (39 . quote)
+        (40 . leftparen)
+        (41 . rightparen)
+        (42 . asterisk)
+        (43 . plus)
+        (44 . comma)
+        (45 . minus)
+        (46 . period)
+        (47 . slash)
+        (48 . 0)
+        (49 . 1)
+        (50 . 2)
+        (51 . 3)
+        (52 . 4)
+        (53 . 5)
+        (54 . 6)
+        (55 . 7)
+        (56 . 8)
+        (57 . 9)
+        (58 . colon)
+        (59 . semicolon)
+        (60 . less)
+        (61 . equals)
+        (62 . greater)
+        (63 . question)
+        (64 . at)
+        (269 . kp-minus)
+        (270 . kp-plus)
         (273 . up)
         (274 . down)
         (275 . right)