summary refs log tree commit diff
diff options
context:
space:
mode:
authorAlexandr Vityazev <avityazev@posteo.org>2021-08-21 21:58:41 +0000
committerBrice Waegeneire <brice@waegenei.re>2021-08-26 22:02:12 +0200
commitb4d132f98e03fae559db832e88897f1e166c4d47 (patch)
treec84347293634b26db996cc0ea614e37c428eeb71
parent399e3ee7b793022b22937901ab4c477ece1ad226 (diff)
downloadguix-b4d132f98e03fae559db832e88897f1e166c4d47.tar.gz
gnu: emacs-vertico: Add new phase after unpack.
* gnu/packages/emacs-xyz.scm (emacs-vertico)[arguments]<phases>:
After the unpack phase add a move-source-files phase.
-rw-r--r--gnu/packages/emacs-xyz.scm12
1 files changed, 12 insertions, 0 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 3657d2b2f2..532440462e 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -29187,6 +29187,18 @@ and preferred services can easily be configured.")
        (sha256
         (base32 "0rddk76ih44b574lsr6d6r9wa2l7c9zlb9kcyw5xvly17ciiq16h"))))
     (build-system emacs-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         ;; Move the extensions source files to the top level, which is included in
+         ;; the EMACSLOADPATH.
+         (add-after 'unpack 'move-source-files
+           (lambda _
+             (let ((el-files (find-files "./extensions" ".*\\.el$")))
+               (for-each (lambda (f)
+                           (rename-file f (basename f)))
+                         el-files))
+             #t)))))
     (native-inputs
      `(("texinfo" ,texinfo)))
     (home-page "https://github.com/minad/vertico")