From 03e7df49c429e08ce6ce46cf913bcc303a9541e0 Mon Sep 17 00:00:00 2001
From: Zhu Zihao <all_but_last@163.com>
Date: Fri, 19 Aug 2022 13:33:20 +0800
Subject: gnu: mu: Use G-expressions.
* gnu/packages/mail.scm (mu)[arguments]: Use G-expressions.
Signed-off-by: Tobias Geerinckx-Rice <me@tobias.gr>
---
gnu/packages/mail.scm | 41 +++++++++++++++++++++--------------------
1 file changed, 21 insertions(+), 20 deletions(-)
(limited to 'gnu/packages/mail.scm')
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index 530cd29f4d..646902b4db 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -1179,29 +1179,30 @@ (define-public mu
(inputs
(list glib gmime xapian))
(arguments
- `(#:modules ((guix build meson-build-system)
+ (list
+ #:modules '((guix build meson-build-system)
(guix build emacs-utils)
(guix build utils))
- #:imported-modules (,@%meson-build-system-modules
+ #:imported-modules `(,@%meson-build-system-modules
(guix build emacs-utils))
- #:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'patch-bin-references
- (lambda _
- (substitute* '("guile/tests/test-mu-guile.cc"
- "mu/tests/test-mu-cmd.cc"
- "mu/tests/test-mu-cmd-cfind.cc"
- "mu/tests/test-mu-query.cc")
- (("/bin/sh") (which "sh")))
- (substitute* '("lib/tests/bench-indexer.cc"
- "lib/utils/mu-test-utils.cc")
- (("/bin/rm") (which "rm")))))
- (add-after 'install 'install-emacs-autoloads
- (lambda* (#:key outputs #:allow-other-keys)
- (emacs-generate-autoloads
- "mu4e"
- (string-append (assoc-ref outputs "out")
- "/share/emacs/site-lisp/mu4e")))))))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'patch-bin-references
+ (lambda _
+ (substitute* '("guile/tests/test-mu-guile.cc"
+ "mu/tests/test-mu-cmd.cc"
+ "mu/tests/test-mu-cmd-cfind.cc"
+ "mu/tests/test-mu-query.cc")
+ (("/bin/sh") (which "sh")))
+ (substitute* '("lib/tests/bench-indexer.cc"
+ "lib/utils/mu-test-utils.cc")
+ (("/bin/rm") (which "rm")))))
+ (add-after 'install 'install-emacs-autoloads
+ (lambda* (#:key outputs #:allow-other-keys)
+ (emacs-generate-autoloads
+ "mu4e"
+ (string-append (assoc-ref outputs "out")
+ "/share/emacs/site-lisp/mu4e")))))))
(home-page "https://www.djcbsoftware.nl/code/mu/")
(synopsis "Quickly find emails")
(description
--
cgit v1.2.3