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.
master
Alex Kost 2017-04-28 16:07:33 +03:00
parent 8ca0c88a89
commit 97658183ed
No known key found for this signature in database
GPG Key ID: 82460C082A0EE98F
1 changed files with 2 additions and 2 deletions

View File

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