Skip to content
Snippets Groups Projects
  • Ludovic Courtès's avatar
    996ed739
    system: Add bindings to configure libc's NSS. · 996ed739
    Ludovic Courtès authored
    * gnu/system/nss.scm: New file.
    * gnu-system.am (GNU_SYSTEM_MODULES): Add it.
    * gnu.scm (%public-modules): Add it.
    * gnu/system.scm (<operating-system>)[name-service-switch]: New field.
      (etc-directory): Add #:nss parameter and honor it.
      (operating-system-etc-directory): Adjust call accordingly.
    * doc/guix.texi (operating-system Reference): Document
      'name-service-switch'.
      (Name Service Switch): New section.
    996ed739
    History
    system: Add bindings to configure libc's NSS.
    Ludovic Courtès authored
    * gnu/system/nss.scm: New file.
    * gnu-system.am (GNU_SYSTEM_MODULES): Add it.
    * gnu.scm (%public-modules): Add it.
    * gnu/system.scm (<operating-system>)[name-service-switch]: New field.
      (etc-directory): Add #:nss parameter and honor it.
      (operating-system-etc-directory): Adjust call accordingly.
    * doc/guix.texi (operating-system Reference): Document
      'name-service-switch'.
      (Name Service Switch): New section.
Code owners
Assign users and groups as approvers for specific file changes. Learn more.
gnu.scm 2.12 KiB
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Joshua S. Grant <jgrant@parenthetical.io>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu)
  #:export (use-package-modules
            use-service-modules
            use-system-modules))

;;; Commentary:
;;;
;;; This composite module re-exports core parts the (gnu …) public modules.
;;;
;;; Code:

(eval-when (eval load compile)
  (begin
    (define %public-modules
      '((gnu system)
        (gnu system file-systems)
        (gnu system grub)                         ; 'grub-configuration'
        (gnu system linux)                        ; 'base-pam-services'
        (gnu system shadow)                       ; 'user-account'
        (gnu system linux-initrd)
        (gnu system nss)
        (gnu services)
        (gnu services base)
        (gnu packages)
        (gnu packages base)
        (guix gexp)))                             ; so gexps can be used

    (for-each (let ((i (module-public-interface (current-module))))
                (lambda (m)
                  (module-use! i (resolve-interface m))))
              %public-modules)))

(define-syntax-rule (use-package-modules module ...)
  (use-modules (gnu packages module) ...))

(define-syntax-rule (use-service-modules module ...)
  (use-modules (gnu services module) ...))

(define-syntax-rule (use-system-modules module ...)
  (use-modules (gnu system module) ...))

;;; gnu.scm ends here