GNU bug report logs - #36404
[PATCH 0/6] Add 'guix deploy'.

Previous Next

Full log

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

From: zerodaysfordays <at> sdf.lonestar.org (Jakob L. Kreuze)
To: "Thompson\, David" <dthompson2 <at> worcester.edu>
Cc: 36404 <at> debbugs.gnu.org
Subject: [PATCH 4/5] Export the (gnu machine) interface.
Date: Fri, 28 Jun 2019 09:37:09 -0400

[Message part 1 (text/plain, inline)]

* gnu.scm (%public-modules): Add '(gnu machine)'.
* gnu.scm (use-machine-modules): New macro.
---
 gnu.scm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/gnu.scm b/gnu.scm
index 2c29b6dc3f..fa643a5b92 100644
--- a/gnu.scm
+++ b/gnu.scm
@@ -27,7 +27,8 @@
   #:use-module (guix packages)
   #:use-module (gnu packages)
   #:use-module (gnu services)
-  #:export (use-package-modules
+  #:export (use-machine-modules
+            use-package-modules
             use-service-modules
             use-system-modules))
 
@@ -45,6 +46,7 @@
         (gnu system file-systems)
         (gnu bootloader)
         (gnu bootloader grub)
+        (gnu machine)
         (gnu system keyboard)
         (gnu system pam)
         (gnu system shadow)                       ; 'user-account'
@@ -142,6 +144,10 @@ Try adding @code{(use-service-modules ~a)}.")
                        (current-source-location))
                       hint)))
 
+(define-syntax-rule (use-machine-modules module ...)
+  (try-use-modules package-module-hint
+                   (gnu machine module) ...))
+
 (define-syntax-rule (use-package-modules module ...)
   (try-use-modules package-module-hint
                    (gnu packages module) ...))
-- 
2.22.0

[signature.asc (application/pgp-signature, inline)]

Previous Next

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