From: Dmitry Gutov <dgutov@yandex.ru>
Date: Mon, 27 Jul 2020 00:04:09 +0000 (+0300)
Subject: Move project--value-in-dir to a different section
X-Git-Tag: emacs-28.0.90~6928
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=33667e02e6fa23a2933fe0a7de488db7015d896e;p=emacs.git

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 c0cb691b368..27974b28f10 100644
--- 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)))
+
 
 ;;; 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")