[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/project-switching afb96da 05/15: Move project-dired and project-
From: |
Simen Heggestøyl |
Subject: |
feature/project-switching afb96da 05/15: Move project-dired and project-eshell higher |
Date: |
Tue, 26 May 2020 11:43:18 -0400 (EDT) |
branch: feature/project-switching
commit afb96da6111ed0f9c26b6b0ff91aaddfec6277a5
Author: Dmitry Gutov <address@hidden>
Commit: Simen Heggestøyl <address@hidden>
Move project-dired and project-eshell higher
* lisp/progmodes/project.el:
(project-dired, project-eshell): Move higher in the file,
according to their universal utility.
---
lisp/progmodes/project.el | 30 +++++++++++++++---------------
1 file changed, 15 insertions(+), 15 deletions(-)
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 7209246..12b7e3f 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -662,6 +662,21 @@ PREDICATE, HIST, and DEFAULT have the same meaning as in
collection predicate t res hist nil)))
res))
+;;;###autoload
+(defun project-dired ()
+ "Open Dired in the current project."
+ (interactive)
+ (let ((dirs (project-roots (project-current t))))
+ (dired (car dirs))))
+
+;;;###autoload
+(defun project-eshell ()
+ "Open Eshell in the current project."
+ (interactive)
+ (let* ((dirs (project-roots (project-current t)))
+ (default-directory (car dirs)))
+ (eshell t)))
+
(declare-function fileloop-continue "fileloop" ())
;;;###autoload
@@ -782,21 +797,6 @@ Used by `project-switch-project' to construct a dispatch
menu of
commands available upon \"switching\" to another project.")
;;;###autoload
-(defun project-dired ()
- "Open Dired in the current project."
- (interactive)
- (let ((dirs (project-roots (project-current t))))
- (dired (car dirs))))
-
-;;;###autoload
-(defun project-eshell ()
- "Open Eshell in the current project."
- (interactive)
- (let* ((dirs (project-roots (project-current t)))
- (default-directory (car dirs)))
- (eshell t)))
-
-;;;###autoload
(defun project-add-switch-command (symbol key label)
"Add a function to the project switching dispatch menu.
SYMBOL should stand for a function to be invoked by the key KEY.
- branch feature/project-switching created (now 449810b), Simen Heggestøyl, 2020/05/26
- feature/project-switching afb7602 01/15: Add project switching functionality, Simen Heggestøyl, 2020/05/26
- feature/project-switching 9422fb5 03/15: Improve project name completion, Simen Heggestøyl, 2020/05/26
- feature/project-switching c8cca68 04/15: Use an alist instead of a keymap, Simen Heggestøyl, 2020/05/26
- feature/project-switching afb96da 05/15: Move project-dired and project-eshell higher,
Simen Heggestøyl <=
- feature/project-switching 02e1ee9 06/15: Integrate project-switch-project with project-find-regexp, Simen Heggestøyl, 2020/05/26
- feature/project-switching 46bb2cb 07/15: Change dispatch binding of 'project-find-regexp', Simen Heggestøyl, 2020/05/26
- feature/project-switching 0db801a 11/15: Update the Emacs manual with recent project.el changes, Simen Heggestøyl, 2020/05/26
- feature/project-switching e37e6c8 13/15: Some copy edits, Simen Heggestøyl, 2020/05/26
- feature/project-switching 9f88356 02/15: Simplify a little, and avoid duplicate commands, Simen Heggestøyl, 2020/05/26
- feature/project-switching c6f56bd 08/15: Turn project switch menu var into a public alist, Simen Heggestøyl, 2020/05/26
- feature/project-switching 7082468 10/15: Rename 'project-switch-menu' to 'project-switch-commands', Simen Heggestøyl, 2020/05/26
- feature/project-switching 0b057ca 12/15: Teach project-current to inhibit the prompt, Simen Heggestøyl, 2020/05/26
- feature/project-switching 449810b 15/15: Avoid adding the empty string to the project list, Simen Heggestøyl, 2020/05/26
- feature/project-switching c6e80fd 09/15: Simplify 'project--keymap-prompt' a bit, Simen Heggestøyl, 2020/05/26