[elpa] externals/corfu 41fcbfbccb: corfu-docframe: Cleanup doc string

[ELPA Syncer]

branch: externals/corfu
commit 41fcbfbccb1ce647728638c79162fa7f9d2b091f
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@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)