More icons for ivy.

init.el

@@ -586,10 +586,17 @@ With argument, do this that many times."
   ("M-x" . 'counsel-M-x)
   )
 
-;; Nicer interface for ivy
+;; Use icons in ivy.
-(use-package ivy-rich
+(use-package all-the-icons-ivy
   :after (all-the-icons counsel)
   :config
+  (all-the-icons-ivy-setup)
+  )
+
+;; Nicer interface for ivy.
+(use-package ivy-rich
+  :after (all-the-icons-ivy counsel)
+  :config
   ;; Icons in switch-buffer.
   (defun my/ivy-rich-switch-buffer-icon (candidate)
     (with-current-buffer
@@ -598,6 +605,8 @@ With argument, do this that many times."
         (if (symbolp icon)
             (all-the-icons-icon-for-mode 'fundamental-mode)
           icon))))
+
+  ;; More detailed buffer view.
   (setq ivy-rich-display-transformers-list
         '(ivy-switch-buffer
           (:columns