diff options
| author | Leo Prikler <leo.prikler@student.tugraz.at> | 2019-12-15 00:45:08 +0100 |
|---|---|---|
| committer | Brett Gilio <brettg@gnu.org> | 2019-12-27 16:54:52 -0600 |
| commit | 9ce3f7f6dc49aef3153a8d58c96528808e82fb3f (patch) | |
| tree | c09cfc0097ff188116383ad47e888dbc4989a7f0 /guix | |
| parent | bd824de3ad5028cf52ddb7378491f8822dee433e (diff) | |
| download | guix-patches-9ce3f7f6dc49aef3153a8d58c96528808e82fb3f.tar guix-patches-9ce3f7f6dc49aef3153a8d58c96528808e82fb3f.tar.gz | |
guix: emacs-utils: Add emacs-batch-disable-compilation.
* guix/build/emacs-utils.scm (emacs-batch-disable-compilation):
New procedure.
Signed-off-by: Brett Gilio <brettg@gnu.org>
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/build/emacs-utils.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/guix/build/emacs-utils.scm b/guix/build/emacs-utils.scm index fdacd30dd6..885fd0a217 100644 --- a/guix/build/emacs-utils.scm +++ b/guix/build/emacs-utils.scm @@ -2,6 +2,7 @@ ;;; Copyright © 2014, 2018 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014 Alex Kost <alezost@gmail.com> ;;; Copyright © 2018 Maxim Cournoyer <maxim.cournoyer@gmail.com> +;;; Copyright © 2019 Leo Prikler <leo.prikler@student.tugraz.at> ;;; ;;; This file is part of GNU Guix. ;;; @@ -23,6 +24,7 @@ #:export (%emacs emacs-batch-eval emacs-batch-edit-file + emacs-batch-disable-compilation emacs-generate-autoloads emacs-byte-compile-directory emacs-substitute-sexps @@ -50,6 +52,12 @@ (string-append "--visit=" file) (format #f "--eval=~S" expr))) +(define (emacs-batch-disable-compilation file) + (emacs-batch-edit-file file + '(progn + (add-file-local-variable 'no-byte-compile t) + (basic-save-buffer)))) + (define (emacs-generate-autoloads name directory) "Generate autoloads for Emacs package NAME placed in DIRECTORY." (let* ((file (string-append directory "/" name "-autoloads.el")) |