[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r118112: * lisp/erc/erc-track.el (erc-modified-chann
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] trunk r118112: * lisp/erc/erc-track.el (erc-modified-channels-display): Update mode line |
Date: |
Wed, 15 Oct 2014 01:15:44 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 118112
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=18510
author: Ivan Shmakov <address@hidden>
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2014-10-14 21:15:40 -0400
message:
* lisp/erc/erc-track.el (erc-modified-channels-display): Update mode line
more frequently.
modified:
lisp/erc/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-4305
lisp/erc/erc-track.el
erctrack.el-20091113204419-o5vbwnq5f7feedwu-4342
=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog 2014-10-10 13:16:12 +0000
+++ b/lisp/erc/ChangeLog 2014-10-15 01:15:40 +0000
@@ -1,3 +1,8 @@
+2014-10-15 Ivan Shmakov <address@hidden>
+
+ * erc-track.el (erc-modified-channels-display): Update mode line
+ more frequently (bug#18510).
+
2014-10-10 Kelvin White <address@hidden>
* erc.el (erc-initialize-log-marker): Only initialize
@@ -434,9 +439,9 @@
2011-11-28 Mike Kazantsev <address@hidden> (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.
=== modified file 'lisp/erc/erc-track.el'
--- a/lisp/erc/erc-track.el 2014-09-24 17:31:59 +0000
+++ b/lisp/erc/erc-track.el 2014-10-15 01:15:40 +0000
@@ -860,7 +860,7 @@
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)))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r118112: * lisp/erc/erc-track.el (erc-modified-channels-display): Update mode line,
Stefan Monnier <=