[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r114975: * lisp/net/rcirc.el (rcirc-record-activity)
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] trunk r114975: * lisp/net/rcirc.el (rcirc-record-activity): Don't abuse add-to-list. |
Date: |
Tue, 05 Nov 2013 14:32:07 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 114975
revision-id: address@hidden
parent: address@hidden
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2013-11-05 09:32:01 -0500
message:
* lisp/net/rcirc.el (rcirc-record-activity): Don't abuse add-to-list.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/net/rcirc.el rcirc.el-20091113204419-o5vbwnq5f7feedwu-4032
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-11-05 14:18:41 +0000
+++ b/lisp/ChangeLog 2013-11-05 14:32:01 +0000
@@ -1,3 +1,7 @@
+2013-11-05 Stefan Monnier <address@hidden>
+
+ * net/rcirc.el (rcirc-record-activity): Don't abuse add-to-list.
+
2013-11-05 Michael Albinus <address@hidden>
Fix problems found while writing a test suite.
@@ -15,13 +19,12 @@
2013-11-05 Bozhidar Batsov <address@hidden>
- * progmodes/python.el (python-mode): Remove incorrect text from
docstring.
- * progmodes/scheme.el (scheme-mode): Remove incorrect text from
docstring.
- * progmodes/prolog.el (prolog-mode): Remove incorrect text from
docstring.
- * emacs-lisp/lisp-mode.el (lisp-mode, lisp-interaction-mode,
emacs-lisp-mode):
- Remove incorrect text from docstring.
-
- * progmodes/ruby-mode.el (ruby-mode): Remove incorrect text from
docstring.
+ * progmodes/python.el (python-mode):
+ * progmodes/scheme.el (scheme-mode):
+ * progmodes/prolog.el (prolog-mode):
+ * progmodes/ruby-mode.el (ruby-mode):
+ * emacs-lisp/lisp-mode.el (lisp-mode, lisp-interaction-mode)
+ (emacs-lisp-mode): Remove incorrect and redundant text from docstring.
2013-11-04 Stefan Monnier <address@hidden>
=== modified file 'lisp/net/rcirc.el'
--- a/lisp/net/rcirc.el 2013-08-05 14:26:57 +0000
+++ b/lisp/net/rcirc.el 2013-11-05 14:32:01 +0000
@@ -1950,7 +1950,8 @@
(old-types rcirc-activity-types))
(when (not (get-buffer-window (current-buffer) t))
(setq rcirc-activity
- (sort (add-to-list 'rcirc-activity (current-buffer))
+ (sort (if (memq (current-buffer) rcirc-activity) rcirc-activity
+ (cons (current-buffer) rcirc-activity))
(lambda (b1 b2)
(let ((t1 (with-current-buffer b1 rcirc-last-post-time))
(t2 (with-current-buffer b2 rcirc-last-post-time)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r114975: * lisp/net/rcirc.el (rcirc-record-activity): Don't abuse add-to-list.,
Stefan Monnier <=