diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-07-11 10:41:55 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2022-07-11 10:58:24 +0200 |
commit | 7fc58dd0dbe2f6af7f139520c8c907de66932645 (patch) | |
tree | fc34beb4753dff1cc8f7af25a235004f06ff76dd | |
parent | eccfd5186b137ba3274980e40ad2599ffe9c286d (diff) | |
download | guix-7fc58dd0dbe2f6af7f139520c8c907de66932645.tar.gz |
gnu: emacs-base16-theme: Update package style.
* gnu/packages/emacs-xyz.scm (emacs-base16-theme)[arguments]: Use G-expressions.
-rw-r--r-- | gnu/packages/emacs-xyz.scm | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index f5f49aaaeb..d360e87d94 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -8880,23 +8880,23 @@ answers.") (base32 "0qp71j77zg8gippcn277s0j5a9n6dbwv3kdp2nya6li4b412vgba")))) (build-system emacs-build-system) (arguments - `(#:include (cons "^build\\/.*\\.el$" - %default-include) - #:phases - (modify-phases %standard-phases - (add-after 'install 'mv-themes - (lambda* (#:key outputs #:allow-other-keys) - (use-modules (ice-9 regex)) - (let* ((out (assoc-ref outputs "out")) - (theme-dir (string-append (elpa-directory out) "/build"))) - (for-each (lambda (theme) - (rename-file - theme - (regexp-substitute #f - (string-match "build\\/" theme) - 'pre 'post))) - (find-files theme-dir "\\.el$")) - (delete-file-recursively theme-dir))))))) + (list #:include #~(cons "^build\\/.*\\.el$" %default-include) + #:phases + #~(modify-phases %standard-phases + (add-after 'install 'mv-themes + (lambda _ + (use-modules (ice-9 regex)) + (let ((theme-dir (string-append (elpa-directory #$output) + "/build"))) + (for-each (lambda (theme) + (rename-file + theme + (regexp-substitute #f + (string-match "build\\/" + theme) + 'pre 'post))) + (find-files theme-dir "\\.el$")) + (delete-file-recursively theme-dir))))))) (home-page "https://github.com/belak/base16-emacs") (synopsis "Base16 color themes for Emacs") (description |