guix_mirror_bot pushed a commit to branch emacs-team
in repository guix.
commit aac98e05656c385951a41f93b85f738c93da91a4
Author: Liliana Marie Prikler <[email protected]>
AuthorDate: Tue Aug 25 22:02:03 2026 +0200
build-system: emacs: Unconditionally chdir into lisp-directory.
This applies the chdir even in the (erroneous) case where only a single
source
file is copied.
* guix/build/emacs-build-system.scm (unpack): Move chdir after cond.
---
guix/build/emacs-build-system.scm | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/guix/build/emacs-build-system.scm
b/guix/build/emacs-build-system.scm
index 60b9e65b4f..61921a88c6 100644
--- a/guix/build/emacs-build-system.scm
+++ b/guix/build/emacs-build-system.scm
@@ -71,16 +71,13 @@ name that has been stripped of the hash and version number."
"Unpack SOURCE into the build directory. SOURCE may be a compressed
archive, a directory, or an Emacs Lisp file."
(cond
- ((file-is-directory? source)
- (gnu:unpack #:source source)
- (and=> lisp-directory chdir))
+ ((file-is-directory? source) (gnu:unpack #:source source))
((string-suffix? ".el" source)
(mkdir "source")
(chdir "source")
(copy-file source (store-file->elisp-source-file source)))
- (else
- (gnu:unpack #:source source)
- (and=> lisp-directory chdir))))
+ (else (gnu:unpack #:source source)))
+ (and=> lisp-directory chdir))
(define* (expand-load-path #:key (prepend-source? #t) #:allow-other-keys)
"Expand EMACSLOADPATH, so that inputs, whose code resides in subdirectories,
