diff --git a/installer.scm b/installer.scm index 6ef49d4..4032687 100644 --- a/installer.scm +++ b/installer.scm @@ -16,9 +16,10 @@ ;;; along with this program. If not, see . ;; Generate a bootable image (e.g. for USB sticks, etc.) with: -;; $ guix system disk-image nongnu/system/install.scm +;; $ guix system image -t iso9660 installer.scm (define-module (nongnu system install) + #:use-module (gnu services) #:use-module (gnu system) #:use-module (gnu system install) #:use-module (gnu packages version-control) @@ -29,6 +30,7 @@ #:use-module (gnu packages mtools) #:use-module (gnu packages package-management) #:use-module (nongnu packages linux) + #:use-module (guix) #:export (installation-os-nonfree)) (define installation-os-nonfree @@ -42,6 +44,13 @@ ;; wpa_supplicant when you try to connect to a wifi network. (kernel-arguments '("quiet" "modprobe.blacklist=radeon" "net.ifnames=0")) + (services + (cons* + ;; Include the channel file so that it can be used during installation + (simple-service 'channel-file etc-service-type + (list `("channels.scm" ,(local-file "channels.scm")))) + (operating-system-user-services installation-os))) + ;; Add some extra packages useful for the installation process (packages (append (list git curl stow vim emacs-no-x-toolkit)