[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/10: gnu: emacs-mew: Improve package style.
From: |
guix-commits |
Subject: |
02/10: gnu: emacs-mew: Improve package style. |
Date: |
Sat, 18 Feb 2023 06:43:08 -0500 (EST) |
ngz pushed a commit to branch master
in repository guix.
commit bc3354a8821f365e692abf04006e3e5a61c44e28
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Sat Feb 18 11:27:17 2023 +0100
gnu: emacs-mew: Improve package style.
* gnu/packages/mail.scm (emacs-mew)[arguments]: Use G-expressions. Remove
trailing #T from phases.
[propagated-inputs]: Re-order inputs alphabetically.
---
gnu/packages/mail.scm | 54 +++++++++++++++++++++++++--------------------------
1 file changed, 26 insertions(+), 28 deletions(-)
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index f7f41a58fb..4c36e05fe0 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -1127,39 +1127,37 @@ repository and Maildir/IMAP as LOCAL repository.")
(sha256
(base32
"0xazygwdc328m5l31rxjazq9giv2xrygp2p2q455lf3jhdxwq1km"))))
- (native-inputs
- (list emacs))
- (propagated-inputs
- (list ruby-sqlite3 ; optional for the database of messages
- ruby)) ; to set GEM_PATH so ruby-sqlite3 is found at runtime
(build-system gnu-build-system)
(arguments
- (let ((elisp-dir "/share/emacs/site-lisp")
- (icon-dir "/share/mew"))
- `(#:modules ((guix build gnu-build-system)
+ (let ((elisp-dir #~(string-append #$output "/share/emacs/site-lisp"))
+ (icon-dir #~(string-append #$output "/share/mew")))
+ (list
+ #:modules '((guix build gnu-build-system)
(guix build utils)
(guix build emacs-utils))
- #:imported-modules (,@%gnu-build-system-modules
+ #:imported-modules `(,@%gnu-build-system-modules
(guix build emacs-utils))
- #:configure-flags
- (list (string-append "--with-elispdir=" %output ,elisp-dir)
- (string-append "--with-etcdir=" %output ,icon-dir))
- #:phases
- (modify-phases %standard-phases
- (add-after 'configure 'patch-mew-icon-directory
- (lambda* (#:key outputs #:allow-other-keys)
- (emacs-substitute-sexps "elisp/mew-key.el"
- ("(def.* mew-icon-directory"
- `(progn
- (add-to-list 'image-load-path 'mew-icon-directory)
- ,(string-append (assoc-ref outputs "out") ,icon-dir))))
- #t))
- (add-after 'install 'generate-autoloads
- (lambda* (#:key outputs #:allow-other-keys)
- (emacs-generate-autoloads
- "mew" (string-append (assoc-ref outputs "out") ,elisp-dir))
- #t)))
- #:tests? #f)))
+ #:tests? #f
+ #:configure-flags
+ #~(list (string-append "--with-elispdir=" #$elisp-dir)
+ (string-append "--with-etcdir=" #$icon-dir))
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'configure 'patch-mew-icon-directory
+ (lambda _
+ (emacs-substitute-sexps "elisp/mew-key.el"
+ ("(def.* mew-icon-directory"
+ `(progn
+ (add-to-list 'image-load-path 'mew-icon-directory)
+ ,#$icon-dir)))))
+ (add-after 'install 'generate-autoloads
+ (lambda _
+ (emacs-generate-autoloads "mew" #$elisp-dir)))))))
+ (native-inputs
+ (list emacs))
+ (propagated-inputs
+ (list ruby ; to set GEM_PATH so ruby-sqlite3 is found at runtime
+ ruby-sqlite3)) ; optional for the database of messages
(home-page "https://mew.org")
(synopsis "Emacs e-mail client")
(description "Mew (Messaging in the Emacs World) is a user interface
- branch master updated (224bcf4f1d -> 2fb42567eb), guix-commits, 2023/02/18
- 03/10: gnu: Add opentaxsolver., guix-commits, 2023/02/18
- 05/10: gnu: emacs-marginalia: Update to 1.1., guix-commits, 2023/02/18
- 06/10: gnu: emacs-vertico: Update to 1.1., guix-commits, 2023/02/18
- 02/10: gnu: emacs-mew: Improve package style.,
guix-commits <=
- 09/10: gnu: distrobox: Skip substitution in man pages., guix-commits, 2023/02/18
- 01/10: gnu: emacs-mew: Update to 6.9-1.35772ee., guix-commits, 2023/02/18
- 04/10: gnu: emacs-corfu: Update to 0.35., guix-commits, 2023/02/18
- 08/10: gnu: openttd-engine: Update to 13.0., guix-commits, 2023/02/18
- 10/10: gnu: komikku: Update to 1.11.1., guix-commits, 2023/02/18
- 07/10: gnu: Add nwg-launchers., guix-commits, 2023/02/18