[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r109939: * subr.el (add-to-history):
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r109939: * subr.el (add-to-history): Fix delete usage. |
Date: |
Sat, 08 Sep 2012 22:30:09 +0800 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 109939
fixes bug: http://debbugs.gnu.org/12314
author: Drew Adams <address@hidden>
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2012-09-08 22:30:09 +0800
message:
* subr.el (add-to-history): Fix delete usage.
modified:
lisp/ChangeLog
lisp/subr.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-09-08 14:23:01 +0000
+++ b/lisp/ChangeLog 2012-09-08 14:30:09 +0000
@@ -1,3 +1,7 @@
+2012-09-08 Drew Adams <address@hidden>
+
+ * subr.el (add-to-history): Fix delete usage (Bug#12314).
+
2012-09-08 Chong Yidong <address@hidden>
* subr.el (syntax-after, syntax-class): Doc fix.
=== modified file 'lisp/subr.el'
--- a/lisp/subr.el 2012-09-08 14:23:01 +0000
+++ b/lisp/subr.el 2012-09-08 14:30:09 +0000
@@ -1548,7 +1548,7 @@
(or keep-all
(not (equal (car history) newelt))))
(if history-delete-duplicates
- (delete newelt history))
+ (setq history (delete newelt history)))
(setq history (cons newelt history))
(when (integerp maxelt)
(if (= 0 maxelt)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r109939: * subr.el (add-to-history): Fix delete usage.,
Chong Yidong <=