diff options
| author | Juri Linkov | 2023-07-10 20:43:13 +0300 |
|---|---|---|
| committer | Juri Linkov | 2023-07-10 20:43:13 +0300 |
| commit | d8238df35a31cb9e065c2d243df77ce55735ed02 (patch) | |
| tree | b0ad80d0a4c246f25c9bf12959ebc212a919fab1 | |
| parent | 845ff9563d47568ddd5cb37c62a53deade2d4693 (diff) | |
| download | emacs-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.el | 3 |
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. |