parent
fba7bf7748
commit
60c965ded8
1 changed files with 1 additions and 11 deletions
|
@ -93,17 +93,7 @@ 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)))
|
||||
|
||||
(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))
|
||||
(setcar switch-buffer-alist '+ivy-rich-buffer-name))))
|
||||
|
||||
|
||||
(def-package! counsel
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue