wip

home.org

@@ -1130,6 +1130,7 @@ Just "silently" wrap when searching at the bottom of a document.
         consult-eglot
         haskell-ts-mode
         jenkinsfile-mode
+        jq-mode
         lispy
         lua-mode
         nix-mode
@@ -1449,15 +1450,16 @@ available? It seems to work for now anyway...
    ("M-s" . consult-history)
    ("M-r" . consult-history))
 
-  (add-hook 'completion-list-mode-hook 'consult-preview-at-point-mode)
-
   (advice-add 'register-preview :override #'consult-register-window)
   (setopt register-preview-delay 0.5)
 
   (setopt xref-show-xrefs-function 'consult-xref)
   (setopt xref-show-definitions-function 'consult-xref)
 
-  (require 'consult)
+  (eval-when-compile
+    (require 'consult))
+
+  (with-eval-after-load 'consult
     (consult-customize
      consult-theme :preview-key '(:debounce 0.2 any)
      consult-ripgrep consult-git-grep consult-grep consult-man
@@ -1465,7 +1467,7 @@ available? It seems to work for now anyway...
      consult-source-bookmark consult-source-file-register
      consult-source-recent-file consult-source-project-recent-file
      ;; :preview-key "M-."
-   :preview-key '(:debounce 0.4 any))
+     :preview-key '(:debounce 0.4 any)))
 
   (setopt consult-narrow-key "<") ;; "C-+"
 
@@ -1483,9 +1485,6 @@ available? It seems to work for now anyway...
   (global-corfu-mode)
   ;; (setq completion-in-region-function #'consult-completion-in-region)
 
-  ;; Consult users will also want the embark-consult package.
-  (add-hook 'embark-collect-mode-hook 'consult-preview-at-point-mode)
-
   (add-hook 'completion-at-point-functions 'cape-file)
 #+END_SRC
 
@@ -1757,10 +1756,7 @@ available? It seems to work for now anyway...
 #+END_SRC
 
 #+BEGIN_SRC elisp
-  (require 'claude-code)
-
   (global-set-key (kbd "C-c c") claude-code-command-map)
-  (claude-code-mode)
 #+END_SRC
 * Theme
 I like Catppuccin Frappe as my theme. Let's use it in as many places as we can.