aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDmitry Gutov2020-05-29 21:37:12 +0300
committerDmitry Gutov2020-05-29 21:37:12 +0300
commitba292ea330b55b06f4742e4aae397ef64086d3dc (patch)
tree768327650dea20b89410034b34cfd6536ee1340b
parentdc15e70ddd0dd01a24aa181d8ebb4718df0592c9 (diff)
downloademacs-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.el4
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