emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix ivy--queue-exhibit: void-function nil error

Browse source 
Until Yevgnen/ivy-rich#51 is merged
This commit is contained in:
Henrik Lissner 2019-03-08 17:58:58 -05:00
parent 062652ec11
commit ee6e4a8b5c
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
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