aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2023-07-10 20:43:13 +0300
committerJuri Linkov2023-07-10 20:43:13 +0300
commitd8238df35a31cb9e065c2d243df77ce55735ed02 (patch)
treeb0ad80d0a4c246f25c9bf12959ebc212a919fab1
parent845ff9563d47568ddd5cb37c62a53deade2d4693 (diff)
downloademacs-d8238df35a31cb9e065c2d243df77ce55735ed02.tar.gz
emacs-d8238df35a31cb9e065c2d243df77ce55735ed02.zip
* lisp/progmodes/project.el (project-prompt-project-name): Fix order.
Reverse choices in this recently added new command to follow exactly the same order as in the old function 'project-prompt-project-dir'.
-rw-r--r--lisp/progmodes/project.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 56c524bcab5..1d5a5fa5c63 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -1679,7 +1679,8 @@ It's also possible to enter an arbitrary directory not in the list."
1679 ret)) 1679 ret))
1680 ;; XXX: Just using this for the category (for the substring 1680 ;; XXX: Just using this for the category (for the substring
1681 ;; completion style). 1681 ;; completion style).
1682 (table (project--file-completion-table (cons dir-choice choices))) 1682 (table (project--file-completion-table
1683 (reverse (cons dir-choice choices))))
1683 (pr-name "")) 1684 (pr-name ""))
1684 (while (equal pr-name "") 1685 (while (equal pr-name "")
1685 ;; If the user simply pressed RET, do this again until they don't. 1686 ;; If the user simply pressed RET, do this again until they don't.