From 90b112bd017851a29a00bcba04eb23216c642214 Mon Sep 17 00:00:00 2001
From: jsancho <devnull@localhost>
Date: Tue, 3 Aug 2010 18:00:40 +0000
Subject: [PATCH]

---
 gacela_events.lisp | 42 ++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 40 insertions(+), 2 deletions(-)

diff --git a/gacela_events.lisp b/gacela_events.lisp
index 5e54fc7..f940553 100644
--- 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)
-- 
2.39.2