Fix ivy--queue-exhibit: void-function nil error
Until Yevgnen/ivy-rich#51 is merged
This commit is contained in:
parent
062652ec11
commit
ee6e4a8b5c
1 changed files with 11 additions and 1 deletions
|
@ -93,7 +93,17 @@ immediately runs it on the current candidate (ending the ivy session)."
|
|||
(colplist (plist-get plist :columns))
|
||||
(switch-buffer-alist (assq 'ivy-rich-candidate colplist)))
|
||||
(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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue