[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: emacs-build-system: Move the source directory to the start of EMA
From: |
guix-commits |
Subject: |
02/02: emacs-build-system: Move the source directory to the start of EMACSLOADPATH. |
Date: |
Sat, 7 Dec 2019 22:37:12 -0500 (EST) |
apteryx pushed a commit to branch master
in repository guix.
commit add773c37a10e2c900fcfaff745e095b7fe96fbb
Author: Maxim Cournoyer <address@hidden>
Date: Sun Dec 8 11:47:23 2019 +0900
emacs-build-system: Move the source directory to the start of EMACSLOADPATH.
Fixes issue #38479 (see: https://bugs.gnu.org/38479).
* guix/build/emacs-build-system.scm (add-source-to-load-path): Move the
source
directory to the start of the EMACSLOADPATH environment variable.
Reported-by: Diego Nicola Barbato <address@hidden>
---
guix/build/emacs-build-system.scm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/guix/build/emacs-build-system.scm
b/guix/build/emacs-build-system.scm
index 41a4205..52c1ea1 100644
--- a/guix/build/emacs-build-system.scm
+++ b/guix/build/emacs-build-system.scm
@@ -76,10 +76,10 @@ archive, a directory, or an Emacs Lisp file."
(define* (add-source-to-load-path #:key dummy #:allow-other-keys)
"Augment the EMACSLOADPATH environment variable with the source directory."
(let* ((source-directory (getcwd))
- (emacs-load-path-value (string-append (getenv "EMACSLOADPATH") ":"
- source-directory)))
+ (emacs-load-path-value (string-append source-directory ":"
+ (getenv "EMACSLOADPATH"))))
(setenv "EMACSLOADPATH" emacs-load-path-value)
- (format #t "source directory ~s appended to the `EMACSLOADPATH' \
+ (format #t "source directory ~s prepended to the `EMACSLOADPATH' \
environment variable\n" source-directory)))
(define* (build #:key outputs inputs #:allow-other-keys)