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.
This commit is contained in:
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

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