diff options
| author | David Morgan <djm_uk@protonmail.com> | 2021-07-15 16:29:56 +0100 |
|---|---|---|
| committer | David Morgan <djm_uk@protonmail.com> | 2021-07-15 16:29:56 +0100 |
| commit | 4aa8f885789597be4447b95c8a4547bec8b676ed (patch) | |
| tree | 758f9f2b0e25c3f8a339622af1d399e20f232715 /emacs-prelude | |
| parent | 68297fa60a7cf65d8b6e998420ddb888cfa27d0c (diff) | |
| download | dotfiles-4aa8f885789597be4447b95c8a4547bec8b676ed.tar.gz | |
More emacs.d updates
Diffstat (limited to 'emacs-prelude')
| -rw-r--r-- | emacs-prelude/personal/lisp/init-clojure.el | 3 | ||||
| -rw-r--r-- | emacs-prelude/personal/lisp/init-completion.el | 12 |
2 files changed, 12 insertions, 3 deletions
diff --git a/emacs-prelude/personal/lisp/init-clojure.el b/emacs-prelude/personal/lisp/init-clojure.el index 191eae2..8612e6b 100644 --- a/emacs-prelude/personal/lisp/init-clojure.el +++ b/emacs-prelude/personal/lisp/init-clojure.el @@ -33,9 +33,10 @@ cider-repl-history-highlight-inserted-item t cider-repl-use-clojure-font-lock t cider-repl-use-pretty-printing t + cider-invert-insert-eval-p t + cider-switch-to-repl-on-insert nil clojure-toplevel-inside-comment-form t) (key-chord-define-global "??" 'cider-xref-fn-refs-select) (key-chord-define-global "qq" 'cider-xref-fn-refs)) (provide 'init-clojure) - diff --git a/emacs-prelude/personal/lisp/init-completion.el b/emacs-prelude/personal/lisp/init-completion.el index 202b4e5..0cf2087 100644 --- a/emacs-prelude/personal/lisp/init-completion.el +++ b/emacs-prelude/personal/lisp/init-completion.el @@ -93,7 +93,15 @@ (use-package vertico :init (vertico-mode) - (setq vertico-cycle t)) + (setq vertico-cycle t) + (advice-add #'vertico--format-candidate :around + (lambda (orig cand prefix suffix index) + (setq cand (funcall orig cand prefix suffix index)) + (concat + (if (= vertico--index index) + (propertize "ยป " 'face 'vertico-current) + " ") + cand)))) (prelude-require-package 'consult) (use-package consult @@ -184,7 +192,7 @@ consult-theme :preview-key '(:debounce 0.2 any) consult-ripgrep consult-git-grep consult-grep - consult-smart-ripgrep consult-iripgrep consult-ripgrep-unrestricted + consult-smart-ripgrep consult-iripgrep consult-ripgrep-unrestricted consult-ripgrep-symbol-at-point consult-bookmark consult-recent-file consult-xref consult-buffer-no-preview consult--source-file consult--source-project-file consult--source-bookmark :preview-key (kbd "M-.")) |