Paste number 306452: My-GuixSD-configuration

Paste number 306452: My-GuixSD-configuration
Pasted by: suitsmeveryfine
When:5 years, 9 months ago
Share:Tweet this! | http://paste.lisp.org/+6KGK
Channel:None
Paste contents:
Raw Source | XML | Display As
(use-modules (gnu) (gnu system nss))
(use-service-modules desktop)
(use-package-modules xfce certs)

(operating-system
  (host-name "mb21")
  (timezone "Europe/Stockholm")
  (locale "sv_SE.utf8")

  ;; Assuming /dev/sdX is the target hard disk, and "root" is
  ;; the label of the target root file system.
  (bootloader (grub-configuration (device "/dev/sda")))
  
  (mapped-devices (list (mapped-device
    (source "/dev/sda1")
    (target "guixsd")
    (type luks-device-mapping))))

  (file-systems (cons (file-system
                        (device "/dev/mapper/guixsd")
                        (title 'device)
                        (mount-point "/")
                        (type "ext4"))
                      %base-file-systems))

  (initrd (lambda (file-systems . rest)
             (apply base-initrd file-systems
                    #:extra-modules '("serpent_generic"  ; LUKS decryption
                                      "wp512"            ; LUKS decryption
                                      "hid-generic"      ; external keyboard
                                      "hid-apple")       ; internal keyboard
                    rest)))

  (swap-devices '("/swapfile"))

  (users (cons (user-account
                (name "albin")
                (comment "Albin")
                (group "users")
                (supplementary-groups '("wheel" "netdev"
                                        "audio" "video"))
                (home-directory "/home/albin"))
               %base-user-accounts))

  ;; Add Xfce
  (packages (cons* xfce              ;desktop environments
                   nss-certs         ;for HTTPS access
                   %base-packages))

  ;; Use the "desktop" services, which include the X11
  ;; log-in service, networking with Wicd, and more.
  (services %desktop-services)

  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss))

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.