fix two minor borkups from the merge

dangerousben · Oct 22, 2008 · e65bd69 · e65bd69
1 parent 1650598
commit e65bd69
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bindings.lisp b/bindings.lisp
@@ -196,7 +196,7 @@ a tile-group, both the group map and tile-group map are active.")
   (kbd "N")     "gnext-with-window"
   (kbd "p")     "gprev"
   (kbd "C-p")   "gprev"
-  (kbd "P")     "gprev-with-window")
+  (kbd "P")     "gprev-with-window"
   (kbd "o")     "gother"
   (kbd "'")     "gselect"
   (kbd "\"")    "grouplist"

diff --git a/command.lisp b/command.lisp
@@ -116,7 +116,7 @@ when missing.
 
 Alternatively, instead of specifying nil for PROMPT or leaving it
 out, an element can just be the argument type."
-  (check-type name symbol)
+  (check-type name (or symbol list))
   (let ((docstring (if (stringp (first body))
                      (first body)
                      (warn (make-condition 'command-docstring-warning :command name))))