* lisp/progmodes/project.el (project-switch-project): Use 'let*' (bug#49635).

This allows overriding-local-map to have effect on read-key-sequence.

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index eab60756c8f3ebeb383adae97055f1f2ce4c2dd8..0e732864268897d0fa41590ec275ac4e1f224f24 100644 (file)
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -1386,8 +1386,8 @@ to directory DIR."
                 (define-key temp-map (vector keychar) cmd)))))
          command)
     (while (not command)
-      (let ((overriding-local-map commands-map)
-            (choice (read-key-sequence (project--keymap-prompt))))
+      (let* ((overriding-local-map commands-map)
+             (choice (read-key-sequence (project--keymap-prompt))))
         (when (setq command (lookup-key commands-map choice))
           (unless (or project-switch-use-entire-map
                       (assq command commands-menu))