[elpa] externals/marginalia 6cd9768 098/241: minor optimization to marginalia--function-doc

[Stefan Monnier]

branch: externals/marginalia
commit 6cd9768252574c9d3e3bc4e53dc5ba4c92678ab7
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    minor optimization to marginalia--function-doc
---
 marginalia.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/marginalia.el b/marginalia.el
index 2bff8cc..f1e0e4e 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -353,8 +353,11 @@ a face"
 
 (defun marginalia--function-doc (sym)
   "Documentation string of function SYM."
-  (when-let (doc (ignore-errors (documentation sym)))
-    (replace-regexp-in-string marginalia--advice-regexp "" doc)))
+  (when-let (str (ignore-errors (documentation sym)))
+    (save-match-data
+      (if (string-match marginalia--advice-regexp str)
+          (substring str (match-end 0))
+        str))))
 
 (defun marginalia-annotate-symbol (cand)
   "Annotate symbol CAND with its documentation string."