diff options
| author | Dmitry Gutov | 2020-05-29 21:37:12 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2020-05-29 21:37:12 +0300 |
| commit | ba292ea330b55b06f4742e4aae397ef64086d3dc (patch) | |
| tree | 768327650dea20b89410034b34cfd6536ee1340b | |
| parent | dc15e70ddd0dd01a24aa181d8ebb4718df0592c9 (diff) | |
| download | emacs-ba292ea330b55b06f4742e4aae397ef64086d3dc.tar.gz emacs-ba292ea330b55b06f4742e4aae397ef64086d3dc.zip | |
project-prompt-project-dir: Use more consistent prompts
* lisp/progmodes/project.el (project-prompt-project-dir):
Use more consistent prompts.
| -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 | ||