summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIvan Shmakov <ivan@siamics.net>2014-10-14 21:15:40 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2014-10-14 21:15:40 -0400
commit643b1e97f71b3f90a55d90e00885b70cda123df2 (patch)
treead5bbc9c2554718c6deb7885289092374eda9e54
parentfcb11aef80477e6218e1de01f71001fdce3f7a9a (diff)
downloademacs-643b1e97f71b3f90a55d90e00885b70cda123df2.tar.gz
* lisp/erc/erc-track.el (erc-modified-channels-display): Update mode line
more frequently. Fixes: debbugs:18510
-rw-r--r--lisp/erc/ChangeLog9
-rw-r--r--lisp/erc/erc-track.el2
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 <ivan@siamics.net>
+
+ * erc-track.el (erc-modified-channels-display): Update mode line
+ more frequently (bug#18510).
+
2014-10-10 Kelvin White <kwhite@gnu.org>
* erc.el (erc-initialize-log-marker): Only initialize
@@ -434,9 +439,9 @@
2011-11-28 Mike Kazantsev <mk.fraggod@gmail.com> (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)))))