From: Jakub Czajka <jakub@ekhem.eu.org>
Date: Sun, 21 Apr 2024 13:50:52 +0000 (+0200)
Subject: [home] Format emacs.scm.
X-Git-Url: https://git.ekhem.eu.org/?a=commitdiff_plain;h=c6678650cd345edc864ab91ec32722ffe6dec589;p=guix.git

[home] Format emacs.scm.
---

diff --git a/conf/home/emacs.scm b/conf/home/emacs.scm
index 20b934e..161bc37 100644
--- 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