2 files changed, 18 insertions, 18 deletions

@@ -19,8 +19,7 @@
 ;;; Code:
 
 ;;; Add `acdw.el'
-(push (expand-file-name "lisp/"
-                        user-emacs-directory)
+(push (expand-file-name "lisp/" user-emacs-directory)
       load-path)
 (require 'acdw)
 
@@ -151,10 +150,10 @@
 ;;; Startup
 (acdw/set `((inhibit-startup-screen t)
             (initial-buffer-choice t)
-            (initial-scratch-message ,(concat
-                                       ";; Howdy, "
-                                       (nth 0 (split-string user-full-name)) "!"
-                                       "  Welcome to GNU Emacs.\n\n"))))
+            (initial-scratch-message
+             ,(concat ";; Howdy, "
+                      (nth 0 (split-string user-full-name)) "!"
+                      "  Welcome to GNU Emacs.\n\n"))))
 
 ;;; Minibuffer
 
@@ -183,15 +182,15 @@
               (icomplete-in-buffer t)))
   (acdw/pkg icomplete-vertical
     :binds (("<down>" icomplete-forward-completions
-             :map icomplete-minibuffer-map)
+                      :map icomplete-minibuffer-map)
             ("C-n" icomplete-forward-completions
-             :map icomplete-minibuffer-map)
+                   :map icomplete-minibuffer-map)
             ("<up>" icomplete-backward-completions
-             :map icomplete-minibuffer-map)
+                    :map icomplete-minibuffer-map)
             ("C-p" icomplete-backward-completions
-             :map icomplete-minibuffer-map)
+                   :map icomplete-minibuffer-map)
             ("C-v" icomplete-vertical-toggle
-             :map icomplete-minibuffer-map))
+                   :map icomplete-minibuffer-map))
     :now ((fido-mode -1)
           (icomplete-mode +1)
           (icomplete-vertical-mode +1))))
@@ -261,13 +260,13 @@
            :host gitlab
            :repo "protesilaos/modus-themes")
   :now ((acdw/set `((modus-themes-slanted-constructs t)
-         (modus-themes-bold-constructs t)
-         (modus-themes-region 'bg-only)
-         (modus-themes-org-blocks 'grayscale)
-         (modus-themes-headings ((1 . section)
-                                 (t . no-color)))
-         (modus-themes-scale-headings nil)
-         (modus-themes-mode-line nil)))
+                    (modus-themes-bold-constructs t)
+                    (modus-themes-region 'bg-only)
+                    (modus-themes-org-blocks 'grayscale)
+                    (modus-themes-headings ((1 . section)
+                                            (t . no-color)))
+                    (modus-themes-scale-headings nil)
+                    (modus-themes-mode-line nil)))
         (acdw/sunrise-sunset #'modus-themes-load-operandi
                              #'modus-themes-load-vivendi))
   :then
@@ -22,6 +22,7 @@
 ;;; Code:
 
 ;;; Utilities
+
 (defun acdw/when-unfocused (func &rest args)
   "Call FUNC, with ARGS, iff all Emacs frames are out of focus.