From 3d0addef2cde8b20d0844771a8acf89505174e88 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 13 Sep 2021 17:17:03 -0500
Subject: Set consult-preview key

---
 init.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/init.el b/init.el
index 70d72b4..e7f08d5 100644
--- a/init.el
+++ b/init.el
@@ -271,6 +271,7 @@ AKA, DO NOT USE THIS FUNCTION!!!"
   (defun circe-command-SHORTEN (url)
     "Shorten URL using `0x0-shorten-uri'."
     (interactive "sURL to shorten: ")
+    ;; TODO: enable /shorten URL comment syntax
     (let ((short-url (0x0-shorten-uri (0x0--choose-server) url)))
       (circe-command-SAY short-url)))
 
@@ -386,6 +387,7 @@ AKA, DO NOT USE THIS FUNCTION!!!"
            consult-project-root-function #'vc-root-dir
            completion-in-region-function #'acdw-consult/complete-in-region
            completion-cycle-threshold 3
+           consult-preview-key (kbd "M-.")
            tab-always-indent 'complete)
 
   (:advise register-preview :override #'consult-register-window)
@@ -467,8 +469,8 @@ AKA, DO NOT USE THIS FUNCTION!!!"
   (:hook visual-line-mode))
 
 (setup (:straight-if (define-repeat-map
-			             :host nil
-			             :repo "https://tildegit.org/acdw/define-repeat-map.el")
+			           :host nil
+			           :repo "https://tildegit.org/acdw/define-repeat-map.el")
                      (acdw/system :home))
 
   (defun acdw/other-window-or-switch-buffer-backward ()
-- 
cgit 1.4.1-21-gabe81