02/03: etc: indent-code.el: Define source tree by "indent-code.el".

[Alex Kost]

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)))