branch: externals/corfu commit 41fcbfbccb1ce647728638c79162fa7f9d2b091f Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
corfu-docframe: Cleanup doc string --- extensions/corfu-docframe.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/extensions/corfu-docframe.el b/extensions/corfu-docframe.el index feba5e03ae..224902d2e6 100644 --- a/extensions/corfu-docframe.el +++ b/extensions/corfu-docframe.el @@ -119,8 +119,10 @@ Returns nil if an error occurs or the documentation content is empty." (message-log-max nil)) (funcall fun candidate))))) (with-current-buffer (or (car-safe res) res) - (setq res (buffer-string))) - (and (not (string-empty-p (string-trim res))) res))) + (setq res (replace-regexp-in-string + "[\\s-\n]*\\[back\\][\\s-\n]*" "" + (buffer-string)) + (and (not (string-blank-p res)) res)))) ;; TODO get rid of optional arguments? (defun corfu-docframe--size (&optional width height)