project--switch-project-command: Retouch

* lisp/progmodes/project.el (project--switch-project-command):
Remove outdated comment and clear the echo area at the end.

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 0d6539113cc0cd78412dbedbdd800be54e45c4c9..fda1081eb62d17a5b6f73a7f17dcf7c4736c96f7 100644 (file)
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -2006,13 +2006,12 @@ Otherwise, use the face `help-key-binding' in the prompt."
           (when (numberp command) (setq command nil))
           (unless (or project-switch-use-entire-map
                       (assq command commands-menu))
-            ;; TODO: Add some hint to the prompt, like "key not
-            ;; recognized" or something.
             (setq command nil)))
         (let ((global-command (lookup-key (current-global-map) choice)))
           (when (memq global-command
                       '(keyboard-quit keyboard-escape-quit))
             (call-interactively global-command)))))
+    (message nil)
     command))
 
 ;;;###autoload