summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2020-07-27 03:04:09 +0300
committerDmitry Gutov <dgutov@yandex.ru>2020-07-27 03:04:09 +0300
commit33667e02e6fa23a2933fe0a7de488db7015d896e (patch)
tree8d757a91e85fc44fd63d9b8aace35fa3f3f98fab
parent7551aff22cd81dbdf68fbd223f4a6ef7e842c2dd (diff)
downloademacs-33667e02e6fa23a2933fe0a7de488db7015d896e.tar.gz
Move project--value-in-dir to a different section
* lisp/progmodes/project.el (project--value-in-dir): Move closer to its uses.
-rw-r--r--lisp/progmodes/project.el14
1 files changed, 7 insertions, 7 deletions
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")