This is an automated email from the git hooks/post-receive script.

guix_mirror_bot pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 5cc880f938 gnu: emacs-shell-command+: Fix build.
5cc880f938 is described below

commit 5cc880f938f491afce519fb0c528dbd87ec9d7a3
Author: Nicolas Goaziou <[email protected]>
AuthorDate: Tue Oct 7 21:31:35 2025 +0200

    gnu: emacs-shell-command+: Fix build.
    
    * gnu/packages/emacs-xyz.scm (emacs-shell-command+)[arguments]: Fix test.
    
    Emacs build system generates a "shell-command+-pkg.el" file, which disturbs 
test suite
    expectations about the layout of working directory.
    
    Change-Id: Ic281a0e1fb8ddee610b19ccdee26d6abbd3f65ca
---
 gnu/packages/emacs-xyz.scm | 22 ++++++++++++----------
 1 file changed, 12 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index b1d2b4bf5d..4ba1bf2dc3 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -42849,16 +42849,18 @@ rather excellent completion provided by both Bash and 
Zsh.")
                (base32
                 "022i7ydwckxqk16s4a83mrdr0c4rmap906qypdkjfh1rjw75qwm5"))))
     (build-system emacs-build-system)
-    (arguments (list #:test-command #~(list "make" "test")
-                     #:phases
-                     #~(modify-phases %standard-phases
-                         (add-after 'unpack 'fix-tests
-                           (lambda _
-                             (substitute* "shell-command+-tests.el"
-                               (("\"shell-command\\+-tests\\.el\"" all)
-                                (string-append 
"\"shell-command+-autoloads.el\""
-                                               " "
-                                               all))))))))
+    (arguments
+     (list #:test-command #~(list "make" "test")
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'fix-tests
+                 (lambda _
+                   (substitute* "shell-command+-tests.el"
+                     (("\"shell-command\\+-tests\\.el\"" all)
+                      (string-join (list "\"shell-command+-autoloads.el\""
+                                         "\"shell-command+-pkg.el\""
+                                         all)
+                                   " "))))))))
     (home-page "https://elpa.gnu.org/packages/shell-command+.html";)
     (synopsis "Extended Emacs @code{shell-command}")
     (description

Reply via email to