Emacs: Prepare all-the-icons-ivy-rich.

https://github.com/seagle0128/all-the-icons-ivy-rich/issues/4
This commit is contained in:
tastytea 2020-02-19 23:51:22 +01:00
parent 9590a85bdf
commit 03acc522a6

View File

@ -1,6 +1,6 @@
;;; ui.el --- Configure user interfaces. -*- lexical-binding: t; -*- ;;; ui.el --- Configure user interfaces. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-02-19T15:08:04+0100> ;; Time-stamp: <2020-02-19T23:50:35+0100>
;;; Commentary: ;;; Commentary:
;; * treemacs ;; * treemacs
@ -81,8 +81,6 @@
(use-package ivy-rich (use-package ivy-rich
;; all-the-icons-ivy would override the ivy-rich switch-buffer improvements. ;; all-the-icons-ivy would override the ivy-rich switch-buffer improvements.
:after (all-the-icons-ivy counsel) :after (all-the-icons-ivy counsel)
:functions (ivy-format-function-line)
:config :config
(defun my/ivy-rich-switch-buffer-icon (candidate) (defun my/ivy-rich-switch-buffer-icon (candidate)
"Return icon for `candidate'." "Return icon for `candidate'."
@ -114,6 +112,13 @@
(setcdr (assq t ivy-format-functions-alist) #'ivy-format-function-line) (setcdr (assq t ivy-format-functions-alist) #'ivy-format-function-line)
) )
;; ;; Use icons in ivy-rich.
;; (use-package all-the-icons-ivy-rich
;; :pin melpa ; We need > 1.1.0.
;; :after (all-the-icons ivy-rich)
;; :config (all-the-icons-ivy-rich-mode 1)
;; )
(use-package ivy-purpose (use-package ivy-purpose
:after (window-purpose) :after (window-purpose)