~ruther/guix-local

5cc880f938f491afce519fb0c528dbd87ec9d7a3 — Nicolas Goaziou 5 months ago 564233a
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
1 files changed, 12 insertions(+), 10 deletions(-)

M gnu/packages/emacs-xyz.scm
M gnu/packages/emacs-xyz.scm => gnu/packages/emacs-xyz.scm +12 -10
@@ 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