; Add a heading and a binding

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index d8f56acedf3..e772570b9e1 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -490,10 +490,14 @@ DIRS must contain directory names."
   ;; Sidestep the issue of expanded/abbreviated file names here.
   (cl-set-difference files dirs :test #'file-in-directory-p))
 
+
+;;; Project commands
+
 ;;;###autoload
 (defvar project-prefix-map
   (let ((map (make-sparse-keymap)))
     (define-key map "f" 'project-find-file)
+    (define-key map "b" 'project-switch-to-buffer)
     (define-key map "s" 'project-shell)
     (define-key map "d" 'project-dired)
     (define-key map "v" 'project-vc-dir)