diff options
| -rw-r--r-- | lisp/progmodes/project.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 92293d0e2d7..1f2a4e84718 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el | |||
| @@ -783,9 +783,9 @@ It's also possible to enter an arbitrary directory." | |||
| 783 | ;; completion style). | 783 | ;; completion style). |
| 784 | (project--file-completion-table | 784 | (project--file-completion-table |
| 785 | (append project--list `(,dir-choice)))) | 785 | (append project--list `(,dir-choice)))) |
| 786 | (pr-dir (completing-read "Project: " choices nil t))) | 786 | (pr-dir (completing-read "Select project: " choices nil t))) |
| 787 | (if (equal pr-dir dir-choice) | 787 | (if (equal pr-dir dir-choice) |
| 788 | (read-directory-name "Choose directory: " default-directory nil t) | 788 | (read-directory-name "Select directory: " default-directory nil t) |
| 789 | pr-dir))) | 789 | pr-dir))) |
| 790 | 790 | ||
| 791 | 791 | ||