From 7fc58dd0dbe2f6af7f139520c8c907de66932645 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Mon, 11 Jul 2022 10:41:55 +0200 Subject: [PATCH] gnu: emacs-base16-theme: Update package style. * gnu/packages/emacs-xyz.scm (emacs-base16-theme)[arguments]: Use G-expressions. --- gnu/packages/emacs-xyz.scm | 34 +++++++++++++++++----------------- 1 file 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 @@ (define-public emacs-base16-theme (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