From aa6002f07fa1ce1382a32499c266347219f71947 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Fri, 2 Apr 2021 13:29:50 -0500
Subject: Change hook formatting

I like putting the `defun' form into the hook definition for tighter coupling.
The functions are just for the hooks, after all.

I'm sure this is somehow bad practice, but ... bleh.
---
 init.el | 29 ++++++++++++++---------------
 1 file changed, 14 insertions(+), 15 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 1e5826e..ad6efdc 100644
--- a/init.el
+++ b/init.el
@@ -717,15 +717,14 @@ if ripgrep is installed, otherwise `consult-grep'."
          "G" elpher-go-current)
   (:hook acdw/reading-mode)
 
-  ;; Make `eww' gemini/gopher aware.
-  ;; From Emacswiki.
-  (defun elpher:eww-browse-url (original url &optional new-window)
-    "Handle gemini and gopher links."
-    (cond ((string-match-p "\\`\\(gemini\\|gopher\\)://" url)
-           (require 'elpher)
-           (elpher-go url))
-          (t (funcall original url new-window))))
-  (advice-add 'eww-browse-url :around #'elpher:eww-browse-url))
+  ;; Make `eww' gemini/gopher aware.  From Emacswiki.
+  (advice-add 'eww-browse-url :around
+              (defun elpher:eww-browse-url (original url &optional new-window)
+                "Handle gemini and gopher links."
+                (cond ((string-match-p "\\`\\(gemini\\|gopher\\)://" url)
+                       (require 'elpher)
+                       (elpher-go url))
+                      (t (funcall original url new-window))))))
 
 (setup (:straight (gemini-mode
                    :host nil
@@ -779,12 +778,12 @@ if ripgrep is installed, otherwise `consult-grep'."
   (apheleia-global-mode +1)
 
   ;; Use a dumb formatter on modes that `apheleia' doesn't work for.
-  (defun dumb-auto-format ()
-    "Run `indent-region' in buffers that don't have an
-  `apheleia' formatter set."
-    (unless (apheleia--get-formatter-command)
-      (indent-region (point-min) (point-max))))
-  (add-hook 'before-save-hook #'dumb-auto-format))
+  (add-hook 'before-save-hook
+            (defun dumb-auto-format ()
+              "Run `indent-region' in buffers that don't have an `apheleia'
+  formatter set."
+              (unless (apheleia--get-formatter-command)
+                (indent-region (point-min) (point-max))))))
 
 ;;;;; Eldoc
 (setup eldoc
-- 
cgit 1.4.1-21-gabe81