         ((or (null level)
              (eq level :unset)) (nth 0 log4slime-other-command-names))
         ((eq level :reset) (nth 1 log4slime-other-command-names))
-        (error "Invalid level %S" level)))
+        (t (error "Invalid level %S" level))))
 
 ;; Logger info is used to communicate information about a logger both from Emacs to Lisp
 ;; and the other way around. The first three elements below are used to identify or find

To make them show up in the menu, but you can customize the
variable `log4slime-menu-levels'.
"
  nil
  nil
  log4slime-mode-map
  (when log4slime-mode
    (log4slime-check-connection t)))


                   (ncol (length cols))
                   (col 0)
                   (nrows 0)
                   is-root-p
                   window)
              ;; (log-expr choices)
              ;; (log-expr cols)
              ;; (create temp buffer)
