diff --git a/buer.scm b/buer.scm
index f5ff43a..0118fa1 100644
--- a/buer.scm
+++ b/buer.scm
@@ -40,24 +40,24 @@
 
  (keyboard-layout
   (keyboard-layout "us,br"
-                   #:options '("grp:menu_switch"
+                   #:options `("grp:menu_switch"
                                "parens:swap_brackets"
                                "caps:swapescape")))
 
  (bootloader
   (bootloader-configuration
    (bootloader grub-bootloader)
-    (targets '("/dev/sda"))
+    (targets `("/dev/sda"))
     (theme (grub-theme
             (image (file-append %artwork-repository
                                 "/backgrounds/guix-silver-16-9.svg"))
-            (gfxmode '("1280x720x32"))))))
+            (gfxmode `("1280x720x32"))))))
 
  (kernel-arguments
-  (list "modprobe.blacklist=usbmouse,usbkbd,pcspkr"
-        "thinkpad_acpi.fan_control=1"
-        "loglevel=5"
-        "quiet"))
+  `("modprobe.blacklist=usbmouse,usbkbd,pcspkr"
+    "thinkpad_acpi.fan_control=1"
+    "loglevel=5"
+    "quiet"))
 
  (file-systems
   (cons* (file-system
@@ -118,12 +118,12 @@
  #|Run some programs from each package with file owner privileges|#
  (setuid-programs
   (map-setuid-programs
-    (shadow     '("passwd" "chfn" "sg" "su" "newgrp" "newuidmap" "newgidmap"))
-    (inetutils  '("ping" "ping6"))
-    (opendoas   '("doas"))
-    (fuse-2     '("fusermount"))
-    (fuse       '("fusermount3"))
-    (util-linux '("mount" "umount"))))
+    (shadow     `("passwd" "chfn" "sg" "su" "newgrp" "newuidmap" "newgidmap"))
+    (inetutils  `("ping" "ping6"))
+    (opendoas   `("doas"))
+    (fuse-2     `("fusermount"))
+    (fuse       `("fusermount3"))
+    (util-linux `("mount" "umount"))))
 
  #|Allow resolution of '.local' host names with mDNS|#
  (name-service-switch %mdns-host-lookup-nss)
@@ -134,10 +134,10 @@
         (service virtual-terminal-service-type)
         (service console-font-service-type
                  (associate-right
-                  (%default-console-font '("tty1" "tty2"))))
+                  (%default-console-font `("tty1" "tty2"))))
         (service agetty-service-type
                  (agetty-configuration
-                  (extra-options '("-L"))
+                  (extra-options `("-L"))
                   (term "vt100")
                   (tty #f)))
         (service mingetty-service-type
@@ -170,12 +170,12 @@
                  (guix-configuration
                   (discover? #t)
                   (build-accounts 16)
-                  (extra-options '("--max-jobs=8" "--cores=4"))))
+                  (extra-options `("--max-jobs=8" "--cores=4"))))
         (service guix-publish-service-type
                  (guix-publish-configuration
                   (port 8080)
                   (advertise? #t)
-                  (compression '(("zstd" 3)))
+                  (compression `(("zstd" 3)))
                   (workers 4)))
 
         #|Mcron service|#
@@ -204,7 +204,7 @@
                  (wpa-supplicant-configuration
                   (config-file "/etc/wpa_supplicant.conf")
                   (interface "wlp2s0")
-                  (extra-options '("-B"))))
+                  (extra-options `("-B"))))
         (service dhcp-client-service-type
                  (dhcp-client-configuration
                   (interfaces 'all)))
@@ -213,8 +213,8 @@
         #|Power management services|#
         (service tlp-service-type
                  (tlp-configuration
-                  (cpu-scaling-governor-on-ac  '("performance"))
-                  (cpu-scaling-governor-on-bat '("powersave"))
+                  (cpu-scaling-governor-on-ac  `("performance"))
+                  (cpu-scaling-governor-on-bat `("powersave"))
                   (cpu-scaling-min-freq-on-ac  1500000)
                   (cpu-scaling-max-freq-on-ac  3500000)
                   (cpu-scaling-min-freq-on-bat 1000000)
@@ -239,7 +239,7 @@
                   (config-file file:thinkfan-config)
                   (respawn? #f)))
 
-        #|Doas config service|#
+        #|Doas configuration services|#
         (service doas-service-type
                  (append #|Miscellaneous|#
                          (list (permit (identity ":wheel")
@@ -291,5 +291,5 @@
         (service sysctl-service-type
                  (sysctl-configuration
                   (sysctl (file-append procps "/sbin/sysctl"))
-                  (settings '(("fs.protected_hardlinks" . "1")
+                  (settings `(("fs.protected_hardlinks" . "1")
                               ("fs.protected_symlinks"  . "1"))))))))