From: Jakub Czajka <jakub@ekhem.eu.org>
Date: Sun, 12 May 2024 10:53:19 +0000 (+0200)
Subject: [system] Format system.scm.
X-Git-Url: https://git.ekhem.eu.org/?a=commitdiff_plain;h=40093344419cddf231b7dc8768dc44f1acd0c9e9;p=guix.git

[system] Format system.scm.
---

diff --git a/system.scm b/system.scm
index 2f052aa..06613b5 100644
--- a/system.scm
+++ b/system.scm
@@ -4,22 +4,22 @@
 ;; system.scm - system configuration for GNU Guix.
 
 (use-modules (conf system bluetooth)
-	     (conf system desktop)
+             (conf system desktop)
              (conf system dns)
              (conf system volume)
              (gnu)
              (gnu system nss))
 
 (use-package-modules base
-		     certs
-		     linux
-		     pulseaudio
-		     xdisorg)
+                     certs
+                     linux
+                     pulseaudio
+                     xdisorg)
 
 (use-service-modules desktop)
 
 (use-system-modules nss
-		    setuid)
+                    setuid)
 
 (operating-system
  (kernel linux-libre)
@@ -35,42 +35,42 @@
  (host-name "machine")
  (mapped-devices
   (list (mapped-device
-	 (source
-	  (uuid "565d174f-3d96-45a1-8bef-fdab38e4d35a"))
-	 (target "fde")
-	 (type luks-device-mapping))
-	(mapped-device
-	 (source "matrix")
-	 (targets
-	  (list "matrix-rootvol" "matrix-swapvol"))
-	 (type lvm-device-mapping))))
+         (source
+          (uuid "565d174f-3d96-45a1-8bef-fdab38e4d35a"))
+         (target "fde")
+         (type luks-device-mapping))
+        (mapped-device
+         (source "matrix")
+         (targets
+          (list "matrix-rootvol" "matrix-swapvol"))
+         (type lvm-device-mapping))))
  (file-systems
   (append
    (list (file-system
-	  (type "ext4")
-	  (mount-point "/")
-	  (device (file-system-label "root"))
-	  (flags '(no-atime))
-	  (needed-for-boot? #t)
-	  (dependencies mapped-devices)))
+          (type "ext4")
+          (mount-point "/")
+          (device (file-system-label "root"))
+          (flags '(no-atime))
+          (needed-for-boot? #t)
+          (dependencies mapped-devices)))
    %base-file-systems))
  (swap-devices
   (list (file-system-label "swap")))
  (users
   (append
    (list (user-account
-	  (name "dak")
-	  (group "users")
-	  (supplementary-groups
-	   (list "audio" "cdrom" "lp" "netdev" "tape" "video" "wheel"))))
+          (name "dak")
+          (group "users")
+          (supplementary-groups
+           (list "audio" "cdrom" "lp" "netdev" "tape" "video" "wheel"))))
    %base-user-accounts))
  (packages
   (append
    (list gnu-make
-	 nss-certs
-	 bluez
-	 pulseaudio
-	 volume)
+         nss-certs
+         bluez
+         pulseaudio
+         volume)
    dwm-desktop-packages
    %base-packages))
  (timezone "Europe/Warsaw")
@@ -84,6 +84,6 @@
  (services
   (append
    (list bluez-service
-	 dnscrypt-proxy-service
-	 keyboard-layout-service)
+         dnscrypt-proxy-service
+         keyboard-layout-service)
    %desktop-services)))