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.

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 7209246c228795b0418ae86f1b65eed3a935ecf2..12b7e3fdb939dfd86c898b52a9fe40197a9360a4 100644 (file)
--- 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
@@ -781,21 +796,6 @@ It's also possible to enter an arbitrary directory."
 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.