From 4f2b5439b9e687288074cba87b5b0a8e3de999b6 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Wed, 15 Sep 2021 17:34:20 -0500
Subject: blech

gotta go
---
 init.el | 29 +++++++++++++++++++++++------
 1 file changed, 23 insertions(+), 6 deletions(-)

diff --git a/init.el b/init.el
index 9b2718b..4a538f1 100644
--- a/init.el
+++ b/init.el
@@ -1067,7 +1067,7 @@ specific to most general, they are these:
   (:with-feature flyspell
     (:bind "C-." #'flyspell-correct-wrapper
            "<f7>" #'acdw/flyspell-correct-f7)
-    (:unbind "C-," "C-." "C-M-i")))
+    (:unbind "C-;" "C-," "C-." "C-M-i")))
 
 (setup (:straight-if forge
                      (acdw/system :home))
@@ -1309,9 +1309,26 @@ specific to most general, they are these:
                   w3m-link
                   w3m-message-link))
     (link-hint-define-type type
-	  :open-secondary browse-url-secondary-browser-function))
+	  :open-secondary browse-url-secondary-browser-function
+      :open-secondary-multiple t))
 
-  (:option link-hint-avy-style 'at)
+  (defun acdw/link-hint-open-all-links (prefix)
+    "Open all visible links.
+When PREFIX is non-nil, open links with
+`browse-url-secondary-browser-function'."
+    (interactive "P")
+    (avy-with link-hint-open-all-links
+      (link-hint--all (if prefix :open-secondary :open))))
+
+  (defun acdw/link-hint-open-multiple-links (prefix)
+    "Use `avy' to open multiple visible links at once.
+When PREFIX is non-nil, open links with
+`browse-url-secondary-browser-function'."
+    (interactive "P")
+    (avy-with link-hint-open-multiple-links
+      (link-hint--multiple (if prefix :open-secondary :open))))
+
+  (:option link-hint-avy-style 'post)
   (:global "C-;"
            (defun acdw/link-hint-open-link (arg)
              "Open a link using `link-hint-open-link', prefix-aware.
@@ -1663,9 +1680,9 @@ browser defined in `browse-url-secondary-browser-function'."
 (setup (:straight powerthesaurus)
   (:global "C-c l t" #'powerthesaurus-lookup-word-dwim))
 
-(setup (:straight prism)
-  (dolist (mode lispy-modes)
-    (add-hook (intern (format "%s-hook" mode)) #'prism-mode)))
+;; (setup (:straight prism)
+;;   (dolist (mode lispy-modes)
+;;     (add-hook (intern (format "%s-hook" mode)) #'prism-mode)))
 
 (setup prog
   (:option show-paren-delay 0
-- 
cgit 1.4.1-21-gabe81