summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVinicius Monego <monego@posteo.net>2022-04-26 23:02:09 -0300
committerVinicius Monego <monego@posteo.net>2022-04-26 23:32:15 -0300
commit4809f290ab72ffae9bed526e3ece3af9a41479de (patch)
treeed91dca1ce59f7ad5b5ba29adc54910f8395a0c6
parenta27804a353462455c83b7c372c8cb5c772a60fd5 (diff)
gnu: emacs-corfu: Add new phase after unpack.
* gnu/packages/emacs-xyz.scm (emacs-corfu)[arguments]<#:phases>: After the unpack phase add a move-source-files phase.
-rw-r--r--gnu/packages/emacs-xyz.scm11
1 files changed, 11 insertions, 0 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index e8dca21707..92bd8ded4d 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -3068,6 +3068,17 @@ of bibliographic references.")
(sha256
(base32 "062lxyqh7nfaixmgfgmqfbkainxc8ypdkj6qjq38xigk55s7c5wk"))))
(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)))))))
(home-page "https://github.com/minad/corfu")
(synopsis "Completion overlay region function")
(description "Corfu enhances the default completion in region function