GNU bug report logs - #72406
[PATCH emacs-team WIP 0/4] Simplify creation of emacs package variants

Previous Next

Full log

Message #68 received at 72406 <at> debbugs.gnu.org (full text, mbox):

From: Liliana Marie Prikler <liliana.prikler <at> gmail.com>
To: 72406 <at> debbugs.gnu.org
Cc: gemmaro.dev <at> gmail.com
Subject: [PATCH emacs-team WIP v4 02/24] build-system: emacs: Make emacs
 the default variant.
Date: Sun, 11 Aug 2024 14:58:43 +0200

* guix/build-system/emacs.scm (resolve-emacs): New variable.
(default-emacs): Use it.  Change to ‘emacs’ instead of ‘emacs-minimal’.
---
 guix/build-system/emacs.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/guix/build-system/emacs.scm b/guix/build-system/emacs.scm
index 3a11738496..88304b9ce1 100644
--- a/guix/build-system/emacs.scm
+++ b/guix/build-system/emacs.scm
@@ -49,11 +49,13 @@ (define %emacs-build-system-modules
     (guix build emacs-utils)
     ,@%gnu-build-system-modules))
 
-(define (default-emacs)
-  "Return the default Emacs package."
+(define* (resolve-emacs name)
+  "Lazily resolve the emacs package by variable NAME."
   ;; Lazily resolve the binding to avoid a circular dependency.
   (let ((emacs-mod (resolve-interface '(gnu packages emacs))))
-    (module-ref emacs-mod 'emacs-minimal)))
+    (module-ref emacs-mod name)))
+
+(define (default-emacs) (resolve-emacs 'emacs))
 
 (define* (lower name
                 #:key source inputs native-inputs outputs system target
-- 
2.45.2

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.