diff options
author | Dmitry Gutov <dgutov@yandex.ru> | 2020-07-25 03:17:47 +0300 |
---|---|---|
committer | Dmitry Gutov <dgutov@yandex.ru> | 2020-07-25 03:17:47 +0300 |
commit | 19064761ad2b17b13bdf3c8bd35e9ff58fe2e4fc (patch) | |
tree | fa1a68f9b8e3fc7620413bb943ea5269f17d3cd9 | |
parent | bca8686f552a93010b130e392ecd92d179260e24 (diff) | |
download | emacs-19064761ad2b17b13bdf3c8bd35e9ff58fe2e4fc.tar.gz |
project-remember-project: New public function
* lisp/progmodes/project.el (project-remember-project):
Rename from project--add-to-project-list-front (bug#42332).
And autoload it.
-rw-r--r-- | lisp/progmodes/project.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index a0930553bd7..5cfc6a20986 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -197,7 +197,7 @@ of the project instance object." pr (project--find-in-directory directory)))) (when maybe-prompt (if pr - (project--add-to-project-list-front pr) + (project-remember-project pr) (project--remove-from-project-list directory) (setq pr (cons 'transient directory)))) pr)) @@ -987,7 +987,8 @@ With some possible metadata (to be decided).") (pp project--list (current-buffer)) (write-region nil nil filename nil 'silent)))) -(defun project--add-to-project-list-front (pr) +;;;###autoload +(defun project-remember-project (pr) "Add project PR to the front of the project list. Save the result in `project-list-file' if the list of projects has changed." (project--ensure-read-project-list) |