diff options
| author | Hilton Chain <hako@ultrarare.space> | 2026-01-17 11:10:54 +0800 |
|---|---|---|
| committer | Hilton Chain <hako@ultrarare.space> | 2026-01-17 15:07:21 +0800 |
| commit | 67bfb5b37b6614bf903220d6287685fbab92e2f6 (patch) | |
| tree | 0e0f6c35dda120c951fc3bd08d260d089a6ca8fb | |
| parent | a0bb4541ba52cb0cfb47da7ce1097e305c8386b3 (diff) | |
nonguix: Re-report bindings from modules commonly used in system setup.
* nonguix.scm: New file.
| -rw-r--r-- | nonguix.scm | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/nonguix.scm b/nonguix.scm new file mode 100644 index 0000000..695382c --- /dev/null +++ b/nonguix.scm @@ -0,0 +1,22 @@ +;;; SPDX-License-Identifier: GPL-3.0-or-later +;;; Copyright © 2026 Hilton Chain <hako@ultrarare.space> + +(define-module (nonguix) + #:use-module (srfi srfi-26)) + +;; Re-export commonly-used modules for system setup. + +(eval-when (eval load compile) + (begin + (define %public-modules + '((nonguix transformations) + (nongnu packages linux) + (nongnu system linux-initrd))) + + (for-each (let ((i (module-public-interface (current-module)))) + (lambda (m) + ;; Ignore non-existent modules, so that we can split the + ;; channel without breaking this module in the future. + (and=> (false-if-exception (resolve-interface m)) + (cut module-use! i <>)))) + %public-modules))) |
