[system] Format dns.scm.

diff --git a/conf/system/dns.scm b/conf/system/dns.scm
index 21cd9b42b9abe0ac312c4ebff09f8cfdd68a1455..cb4fcaa96b7942f3c641106a3c4b11050c1ead5e 100644 (file)
--- a/conf/system/dns.scm
+++ b/conf/system/dns.scm
@@ -17,11 +17,11 @@
   #:use-module (guix utils)
   #:use-module (ice-9 match)
   #:export (dnscrypt-proxy
-           dnscrypt-proxy-configuration
-           dnscrypt-proxy-configuration?
-           dnscrypt-proxy-xresources
-           dnscrypt-proxy-service
-           dnscrypt-proxy-service-type))
+            dnscrypt-proxy-configuration
+            dnscrypt-proxy-configuration?
+            dnscrypt-proxy-xresources
+            dnscrypt-proxy-service
+            dnscrypt-proxy-service-type))
 
 (define-public dnscrypt-proxy
   (package
@@ -36,7 +36,7 @@
         (commit version)))
       (file-name
        (git-file-name name
-                     version))
+                      version))
       (sha256
        (base32
         "1v4n0pkwcilxm4mnj4fsd4gf8pficjj40jnmfkiwl7ngznjxwkyw"))))
@@ -61,11 +61,11 @@ DNS-over-HTTPS.")
   dnscrypt-proxy-configuration make-dnscrypt-proxy-configuration
   dnscrypt-proxy-configuration?
   (package dnscrypt-proxy-configuration-package
-          (default dnscrypt-proxy))
+           (default dnscrypt-proxy))
   (config-file dnscrypt-proxy-configuration-config-file
                (default (string-concatenate
-                        (list (getenv "GUIX_PACKAGE_PATH")
-                              "/dns/etc/dnscrypt-proxy/dnscrypt-proxy.toml")))))
+                         (list (getenv "GUIX_PACKAGE_PATH")
+                               "/dns/etc/dnscrypt-proxy/dnscrypt-proxy.toml")))))
 
 (define dnscrypt-proxy-shepherd-service
   (match-lambda
@@ -74,21 +74,21 @@ DNS-over-HTTPS.")
      (provision '(dnscrypt-proxy dns))
      (start #~(make-forkexec-constructor
                (list #$(file-append package "/bin/dnscrypt-proxy")
-                    "-config"
-                    "/etc/dnscrypt-proxy.toml")
-              #:log-file
-              "/var/log/dnscrypt-proxy.log"))
+                     "-config"
+                     "/etc/dnscrypt-proxy.toml")
+               #:log-file
+               "/var/log/dnscrypt-proxy.log"))
      (stop #~(make-kill-destructor))
      (documentation "Dnscrypt-proxy server.")))))
 
 (define (symlink-dnscrypt-proxy-dotfiles config)
   (list `("dnscrypt-proxy.toml"
-         ,(local-file
-           (dnscrypt-proxy-configuration-config-file config)))
-       `("resolv.conf"
-         ,(local-file (string-concatenate
-                       (list (getenv "GUIX_PACKAGE_PATH")
-                             "/dns/etc/resolv.conf"))))))
+          ,(local-file
+            (dnscrypt-proxy-configuration-config-file config)))
+        `("resolv.conf"
+          ,(local-file (string-concatenate
+                        (list (getenv "GUIX_PACKAGE_PATH")
+                              "/dns/etc/resolv.conf"))))))
 
 (define dnscrypt-proxy-service-type
   (service-type
@@ -96,8 +96,8 @@ DNS-over-HTTPS.")
    (extensions
     (list (service-extension shepherd-root-service-type
                              (compose list dnscrypt-proxy-shepherd-service))
-         (service-extension etc-service-type
-                            symlink-dnscrypt-proxy-dotfiles)))
+          (service-extension etc-service-type
+                             symlink-dnscrypt-proxy-dotfiles)))
    (default-value (dnscrypt-proxy-configuration))
    (description "Shepherd service which runs the `dnscrypt-proxy` server.")))