[home] Format emacs.scm.

diff --git a/conf/home/emacs.scm b/conf/home/emacs.scm
index 20b934ec011c87b97f8a322ea16cd205b8acb054..161bc37cb3e1baf2dff823d4440b74c5cf2b496e 100644 (file)
--- a/conf/home/emacs.scm
+++ b/conf/home/emacs.scm
@@ -28,168 +28,168 @@
 
 (define emacs-batch-edit-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages '())
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-batch-edit.el")))))
+           (home-program-configuration
+            (packages '())
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-batch-edit.el")))))
 
 (define emacs-calfw-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list binutils))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-calendar.el")))))
+           (home-program-configuration
+            (packages
+             (list binutils))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-calendar.el")))))
 
 (define emacs-consult-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list ripgrep))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-consult.el")))))
+           (home-program-configuration
+            (packages
+             (list ripgrep))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-consult.el")))))
 
 (define emacs-daemon-shepherd-service
   (shepherd-service
    (provision '(emacs))
    (start #~(make-forkexec-constructor
-            (list "emacs" "--fg-daemon")
-            #:directory (getenv "HOME")))
+             (list "emacs" "--fg-daemon")
+             #:directory (getenv "HOME")))
    (stop #~(make-kill-destructor))
    (documentation "")))
 
 (define emacs-daemon-service
   (simple-service 'emacs-daemon-service
-                 home-shepherd-service-type
-                 (list emacs-daemon-shepherd-service)))
+                  home-shepherd-service-type
+                  (list emacs-daemon-shepherd-service)))
 
 (define emacs-dired-service
   (service home-program-service-type
-          (home-program-configuration
-           ;; file
-           (packages
-            (list xdg-utils))
-           (dotfiles
-            (list "mime/.config/mimeapps.list"
-                  "emacs/.config/emacs/conf/conf-dired.el")))))
+           (home-program-configuration
+            ;; file
+            (packages
+             (list xdg-utils))
+            (dotfiles
+             (list "mime/.config/mimeapps.list"
+                   "emacs/.config/emacs/conf/conf-dired.el")))))
 
 (define emacs-document-service
   (service home-program-service-type
-          (home-program-configuration
-           ;; libpng cairo autoconf automake gcc pkg-config
-           (packages
-            (list poppler))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-document.el")))))
+           (home-program-configuration
+            ;; libpng cairo autoconf automake gcc pkg-config
+            (packages
+             (list poppler))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-document.el")))))
 
 (define emacs-email-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list isync
-                  msmtp))
-           (dotfiles
-            (list "bash/.config/profile.d/50-notmuch.sh"
-                  "emacs/.config/emacs/conf/conf-email.el"
-                  "email/.local/mail/.hooks/pre-new")))))
+           (home-program-configuration
+            (packages
+             (list isync
+                   msmtp))
+            (dotfiles
+             (list "bash/.config/profile.d/50-notmuch.sh"
+                   "emacs/.config/emacs/conf/conf-email.el"
+                   "email/.local/mail/.hooks/pre-new")))))
 
 (define emacs-keys-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages '())
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-keys.el")))))
+           (home-program-configuration
+            (packages '())
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-keys.el")))))
 
 (define emacs-language-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list aspell
-                  aspell-dict-en))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-language.el")))))
+           (home-program-configuration
+            (packages
+             (list aspell
+                   aspell-dict-en))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-language.el")))))
 
 (define emacs-minibuffer-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages '())
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-minibuffer.el")))))
+           (home-program-configuration
+            (packages '())
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-minibuffer.el")))))
 
 (define emacs-music-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list alsa-utils
-                  mplayer))
-           (dotfiles
-            (list "bash/.config/profile.d/50-alsa.sh"
-                  "bash/.config/profile.d/50-mplayer.sh"
-                  "emacs/.config/emacs/conf/conf-music.el")))))
+           (home-program-configuration
+            (packages
+             (list alsa-utils
+                   mplayer))
+            (dotfiles
+             (list "bash/.config/profile.d/50-alsa.sh"
+                   "bash/.config/profile.d/50-mplayer.sh"
+                   "emacs/.config/emacs/conf/conf-music.el")))))
 
 (define emacs-org-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list emacs-org-roam
-                  sqlite))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-org.el")))))
+           (home-program-configuration
+            (packages
+             (list emacs-org-roam
+                   sqlite))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-org.el")))))
 
 (define emacs-package-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages '())
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-package.el")))))
+           (home-program-configuration
+            (packages '())
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-package.el")))))
 
 (define emacs-pass-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list gnupg
-                  password-store))
-           (dotfiles
-            (list "bash/.config/profile.d/50-gpg.sh"
-                  "bash/.config/profile.d/50-pass.sh"
-                  "emacs/.config/emacs/conf/conf-crypt.el")))))
+           (home-program-configuration
+            (packages
+             (list gnupg
+                   password-store))
+            (dotfiles
+             (list "bash/.config/profile.d/50-gpg.sh"
+                   "bash/.config/profile.d/50-pass.sh"
+                   "emacs/.config/emacs/conf/conf-crypt.el")))))
 
 (define emacs-rss-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list curl))
-           (dotfiles
-            (list "emacs/.config/emacs/conf/conf-rss.el")))))
+           (home-program-configuration
+            (packages
+             (list curl))
+            (dotfiles
+             (list "emacs/.config/emacs/conf/conf-rss.el")))))
 
 (define emacs-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list emacs))
-           (dotfiles
-            (list "emacs/.config/emacs/init.el"
-                  "emacs/.config/emacs/conf/conf-emacs.el"
-                  "emacs/.config/emacs/conf/conf-lisp.el"
-                  "emacs/.config/emacs/conf/conf-theme.el"
-                  "emacs/.config/emacs/conf/conf-variables.el"
-                  "emacs/.config/emacs/conf/conf-web.el"
-                  "emacs/.local/bin/emacs_client")))))
+           (home-program-configuration
+            (packages
+             (list emacs))
+            (dotfiles
+             (list "emacs/.config/emacs/init.el"
+                   "emacs/.config/emacs/conf/conf-emacs.el"
+                   "emacs/.config/emacs/conf/conf-lisp.el"
+                   "emacs/.config/emacs/conf/conf-theme.el"
+                   "emacs/.config/emacs/conf/conf-variables.el"
+                   "emacs/.config/emacs/conf/conf-web.el"
+                   "emacs/.local/bin/emacs_client")))))
 
 (define emacs-vc-service
   (service home-program-service-type
-          (home-program-configuration
-           (packages
-            (list git))
-           (dotfiles
-            (list "git/.config/git/config"
-                  "emacs/.config/emacs/conf/conf-vc.el")))))
+           (home-program-configuration
+            (packages
+             (list git))
+            (dotfiles
+             (list "git/.config/git/config"
+                   "emacs/.config/emacs/conf/conf-vc.el")))))
 
 (define emacs-services
   (list emacs-batch-edit-service
         emacs-calfw-service
         emacs-consult-service
-       emacs-daemon-service
+        emacs-daemon-service
         emacs-dired-service
         emacs-document-service
         emacs-email-service