Move project--value-in-dir to a different section

* lisp/progmodes/project.el (project--value-in-dir):
Move closer to its uses.

diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index c0cb691b36832c857e6c8c258fef77b2a0c145fe..27974b28f10617b1e64c01eb1d0a22dbc96f6f8f 100644 (file)
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -568,6 +568,13 @@ DIRS must contain directory names."
   ;; Sidestep the issue of expanded/abbreviated file names here.
   (cl-set-difference files dirs :test #'file-in-directory-p))
 
+(defun project--value-in-dir (var dir)
+  (with-temp-buffer
+    (setq default-directory dir)
+    (let ((enable-local-variables :all))
+      (hack-dir-local-variables-non-file-buffer))
+    (symbol-value var)))
+
 \f
 ;;; Project commands
 
@@ -660,13 +667,6 @@ The following commands are available:
 
 ;;;###autoload (define-key tab-prefix-map "p" #'project-other-tab-command)
 
-(defun project--value-in-dir (var dir)
-  (with-temp-buffer
-    (setq default-directory dir)
-    (let ((enable-local-variables :all))
-      (hack-dir-local-variables-non-file-buffer))
-    (symbol-value var)))
-
 (declare-function grep-read-files "grep")
 (declare-function xref--show-xrefs "xref")
 (declare-function xref--find-ignores-arguments "xref")