diff options
author | Case Duckworth | 2021-08-12 14:21:42 -0500 |
---|---|---|
committer | Case Duckworth | 2021-08-12 14:22:26 -0500 |
commit | 90ea0355f759d9e5aa584e64870a9a0591a838ab (patch) | |
tree | 1cdbc3438056df95622bb75c7553f7926771b6d8 | |
parent | Check that `consult-crm-map' is bound before assigning things to it (diff) | |
download | emacs-90ea0355f759d9e5aa584e64870a9a0591a838ab.tar.gz emacs-90ea0355f759d9e5aa584e64870a9a0591a838ab.zip |
Break lambda out into function
.. and remove vuiet. oop
-rw-r--r-- | init.el | 27 |
1 files changed, 10 insertions, 17 deletions
diff --git a/init.el b/init.el index 2c1fb85..0883a38 100644 --- a/init.el +++ b/init.el | |||
@@ -1469,24 +1469,17 @@ if ripgrep is installed, otherwise `consult-grep'." | |||
1469 | (:also-load vertico-mouse) | 1469 | (:also-load vertico-mouse) |
1470 | (vertico-mouse-mode +1) | 1470 | (vertico-mouse-mode +1) |
1471 | 1471 | ||
1472 | ;; Prefix the current candidate with ": ". From Vertico wiki. | 1472 | ;; Prefix the current candidate with "> ". From Vertico wiki. |
1473 | (advice-add #'vertico--format-candidate :around | 1473 | (defun vertico-format@add-arrow (orig cand prefix suffix index _start) |
1474 | (lambda (orig cand prefix suffix index _start) | 1474 | (setq cand (funcall orig cand prefix suffix index _start)) |
1475 | (setq cand (funcall orig cand prefix suffix index _start)) | 1475 | (concat |
1476 | (concat | 1476 | (if (= vertico--index index) |
1477 | (if (= vertico--index index) | 1477 | (propertize "> " 'face 'vertico-current) |
1478 | (propertize ": " 'face 'vertico-current) | 1478 | " ") |
1479 | " ") | 1479 | cand)) |
1480 | cand)))) | 1480 | (advice-add #'vertico--format-candidate :around #'vertico-format@add-arrow)) |
1481 | 1481 | ||
1482 | (setup (:straight vuiet) | ||
1483 | (:needs "youtube-dl" | ||
1484 | "mpv") | ||
1485 | 1482 | ||
1486 | ;; lastfm.el is required too, and needs some setup: | ||
1487 | ;; https://github.com/mihaiolteanu/lastfm.el | ||
1488 | (setup (:straight lastfm) | ||
1489 | (require 'lastfm))) | ||
1490 | 1483 | ||
1491 | (setup (:straight web-mode) | 1484 | (setup (:straight web-mode) |
1492 | (:option css-level-offset 2 | 1485 | (:option css-level-offset 2 |