From 643b1e97f71b3f90a55d90e00885b70cda123df2 Mon Sep 17 00:00:00 2001 From: Ivan Shmakov Date: Tue, 14 Oct 2014 21:15:40 -0400 Subject: [PATCH] * lisp/erc/erc-track.el (erc-modified-channels-display): Update mode line more frequently. Fixes: debbugs:18510 --- lisp/erc/ChangeLog | 9 +++++++-- lisp/erc/erc-track.el | 2 +- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 0833bda4cb1..c12f289ce0f 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog @@ -1,3 +1,8 @@ +2014-10-15 Ivan Shmakov + + * erc-track.el (erc-modified-channels-display): Update mode line + more frequently (bug#18510). + 2014-10-10 Kelvin White * erc.el (erc-initialize-log-marker): Only initialize @@ -434,9 +439,9 @@ 2011-11-28 Mike Kazantsev (tiny change) - * erc-dcc.el (erc-dcc-ctcp-query-send-regexp): Updated regexp to + * erc-dcc.el (erc-dcc-ctcp-query-send-regexp): Update regexp to match quoted filenames with spaces inside. - (erc-dcc-handle-ctcp-send): Updated regexp match group numbers, + (erc-dcc-handle-ctcp-send): Update regexp match group numbers, added processing of escaped quotes and backslashes if filename itself was in quotes. diff --git a/lisp/erc/erc-track.el b/lisp/erc/erc-track.el index 706cce2fefe..47e76c3ea1e 100644 --- a/lisp/erc/erc-track.el +++ b/lisp/erc/erc-track.el @@ -860,7 +860,7 @@ Use `erc-make-mode-line-buffer-name' to create buttons." faces (cdr faces))) strings))) (newobject (erc-modified-channels-object strings))) - (unless (equal oldobject newobject) + (unless (equal-including-properties oldobject newobject) (setq erc-modified-channels-object newobject) (force-mode-line-update t))))) -- 2.39.5