Improve grammar in comment explaning what DEFINE-KEYSYM does.

sharplispers · Jan 27, 2016 · 114e0de · 114e0de
1 parent e226c0f
commit 114e0de
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/translate.lisp b/translate.lisp
@@ -118,8 +118,8 @@
 
 (defun define-keysym (object keysym &key lowercase translate modifiers mask display)
   ;; Define the translation from keysym/modifiers to a (usually
-  ;; character) object.  ANy previous keysym definition with
-  ;; KEYSYM and MODIFIERS is deleted before adding the new definition.
+  ;; character) object.  Any previous keysym definition with KEYSYM
+  ;; and MODIFIERS is deleted before the new definition is added.
   ;;
   ;; MODIFIERS is either a modifier-mask or list containing intermixed
   ;; keysyms and state-mask-keys specifying when to use this