awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Restore reverted ee6e4a8b

Browse Source 
Although Yevgnen/ivy-rich#51 was merged upstream, due to Melpa issues,
it hasn't been pulled. I'll restore this under it has.
This commit is contained in:
Henrik Lissner
2019-03-13 01:35:46 -04:00
parent 29277c9b02
commit e50157bcec
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
modules/completion/ivy/config.el
View File

@ -93,7 +93,17 @@ immediately runs it on the current candidate (ending the ivy session)."
(colplist (plist-get plist :columns)) (colplist (plist-get plist :columns))
(switch-buffer-alist (assq 'ivy-rich-candidate colplist))) (switch-buffer-alist (assq 'ivy-rich-candidate colplist)))
(when switch-buffer-alist (when switch-buffer-alist
(setcar switch-buffer-alist '+ivy-rich-buffer-name)))) (setcar switch-buffer-alist '+ivy-rich-buffer-name)))
(defun +ivy*rich-counsel-function-docstring (candidate)
(let ((doc (replace-regexp-in-string
":\\(\\(before\\|after\\)\\(-\\(whilte\\|until\\)\\)?\\|around\\|override\\|\\(filter-\\(args\\|return\\)\\)\\) advice:[ ]*‘.+?’[\r\n]+"
""
(or (ignore-errors (documentation (intern-soft candidate))) ""))))
(if (string-match "^\\(.+\\)\\([\r\n]\\)?" doc)
(setq doc (match-string 1 doc))
"")))
(advice-add #'ivy-rich-counsel-function-docstring :override #'+ivy*rich-counsel-function-docstring))
(def-package! counsel (def-package! counsel