emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 4d17294: Remove text props from callback args in erc-button


From: Lars Ingebrigtsen
Subject: master 4d17294: Remove text props from callback args in erc-button
Date: Fri, 23 Jul 2021 09:18:15 -0400 (EDT)

branch: master
commit 4d172946c3953b3990182d794e5bda6a11646e29
Author: F. Jason Park <jp@neverwas.me>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Remove text props from callback args in erc-button
    
    * lisp/erc/erc-button.el (erc-button-add-buttons-1): Remove text
    properties from strings stored in `erc-data' and passed to
    `erc-callback'
    (both text properties themselves) (bug#49704).  This reduces
    memory usage in erc buffers (which are long-lived and can become
    very large).
---
 lisp/erc/erc-button.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el
index 4678e7b..5953471 100644
--- a/lisp/erc/erc-button.el
+++ b/lisp/erc/erc-button.el
@@ -300,7 +300,7 @@ specified by `erc-button-alist'."
           (end (match-end (nth 1 entry)))
           (form (nth 2 entry))
           (fun (nth 3 entry))
-          (data (mapcar #'match-string (nthcdr 4 entry))))
+          (data (mapcar #'match-string-no-properties (nthcdr 4 entry))))
       (when (or (eq t form)
                 (eval form t))
         (erc-button-add-button start end fun nil data regexp)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]