[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/03: etc: indent-code.el: Define source tree by "indent-code.el".
From: |
Alex Kost |
Subject: |
02/03: etc: indent-code.el: Define source tree by "indent-code.el". |
Date: |
Thu, 4 May 2017 15:46:13 -0400 (EDT) |
alezost pushed a commit to branch master
in repository guix.
commit 97658183eda6e196bd16bed02838d321b45aee70
Author: Alex Kost <address@hidden>
Date: Fri Apr 28 16:07:33 2017 +0300
etc: indent-code.el: Define source tree by "indent-code.el".
* etc/indent-code.el.in: Set default directory by "indent-code.el"
itself, otherwise it works only when called from the top directory of
the guix source tree.
---
etc/indent-code.el.in | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/etc/indent-code.el.in b/etc/indent-code.el.in
index 68ad72c..6102b5d 100755
--- a/etc/indent-code.el.in
+++ b/etc/indent-code.el.in
@@ -26,10 +26,10 @@
;;; Code:
-;; Load Scheme indentation rules from the current directory.
+;; Load Scheme indentation rules from ".dir-locals.el".
(with-temp-buffer
(scheme-mode)
- (let ((default-directory (file-name-as-directory "."))
+ (let ((default-directory (file-name-as-directory load-file-name))
(enable-local-variables :all))
(hack-dir-local-variables)
(hack-local-variables-apply)))