~ruther/guix-local: gnu: emacs-magit: Improve style.

8ee456e2bda8f72ccaf2398a1709a85e6e32d952 — Cayetano Santos a year ago 3795345

gnu: emacs-magit: Improve style.

* gnu/packages/emacs-xyz.scm (emacs-magit): Replace phase by
lisp-directory.
<:#lisp-directory>: Set to "lisp".
<:#phases>{chdir-lisp}: Remove.
{build-info-manual}: Adapt paths.
{patch-version-executables}: Run after unpack phase.

Change-Id: If1efe3ca159764cc6ba59d0b061ac447766b7927
Signed-off-by: Ian Eure <ian@retrospec.tv>

patch browse .tar.gz .zip

1 files changed, 4 insertions(+), 6 deletions(-)

M gnu/packages/emacs-xyz.scm

M gnu/packages/emacs-xyz.scm => gnu/packages/emacs-xyz.scm +4 -6

@@ 2087,19 2087,17 @@ before interacting with non-free LLMs.")
     (build-system emacs-build-system)
     (arguments
      (list
+      #:lisp-directory "lisp"
       #:test-command #~(list "make" "-C" ".." "test")
       #:phases
       #~(modify-phases %standard-phases
           (add-after 'unpack 'build-info-manual
             (lambda _
-              (invoke "make" "info")
+              (invoke "make" "-C" ".." "info")
               ;; Copy info files to the lisp directory, which acts as
               ;; the root of the project for the emacs-build-system.
-              (rename-file "docs/magit.info" "lisp/magit.info")))
-          (add-after 'build-info-manual 'chdir-lisp
-            (lambda _
-              (chdir "lisp")))
-          (add-after 'chdir-lisp 'patch-version-executables
+              (rename-file "../docs/magit.info" "../lisp/magit.info")))
+          (add-after 'unpack 'patch-version-executables
             (lambda* (#:key inputs #:allow-other-keys)
               (emacs-substitute-variables "magit.el"
                 ("magit-version" #$version))