diff options
Diffstat (limited to 'lisp/progmodes/project.el')
| -rw-r--r-- | lisp/progmodes/project.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 39c122f75ff..ac56537b977 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el | |||
| @@ -744,6 +744,9 @@ LABEL is used to distinguish the function in the dispatch menu." | |||
| 744 | 'project-find-file "f" "Find file") | 744 | 'project-find-file "f" "Find file") |
| 745 | 745 | ||
| 746 | (project-add-switch-command | 746 | (project-add-switch-command |
| 747 | 'project-find-regexp "g" "Find regexp") | ||
| 748 | |||
| 749 | (project-add-switch-command | ||
| 747 | 'project-dired "d" "Dired") | 750 | 'project-dired "d" "Dired") |
| 748 | 751 | ||
| 749 | (project-add-switch-command | 752 | (project-add-switch-command |
| @@ -776,7 +779,7 @@ and presented in a dispatch menu." | |||
| 776 | (if (equal choice (kbd "C-g")) | 779 | (if (equal choice (kbd "C-g")) |
| 777 | (message "Quit") | 780 | (message "Quit") |
| 778 | (let ((default-directory dir)) | 781 | (let ((default-directory dir)) |
| 779 | (funcall (assoc-default choice project--switch-alist)))))) | 782 | (call-interactively (assoc-default choice project--switch-alist)))))) |
| 780 | 783 | ||
| 781 | (provide 'project) | 784 | (provide 'project) |
| 782 | ;;; project.el ends here | 785 | ;;; project.el ends here |