From 74db95ca362801386ca2ecd4cc9fc0d30a6d6b8f Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Thu, 16 Feb 2012 22:33:58 +0800 Subject: [PATCH] Use add-to-list instead of push in gnus-1 to avoid duplicate entries. --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-start.el | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 9ac21e5a33e..61f6ff9a3d3 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2012-02-16 Leo Liu + + * gnus-start.el (gnus-1): Avoid duplicate entries. + 2012-02-15 Lars Ingebrigtsen * shr.el (shr-remove-trailing-whitespace): Really delete the padding on diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index 9b1d5681e6c..bb7dd76d590 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -763,8 +763,8 @@ prompt the user for the name of an NNTP server to use." ;; Add "native" to gnus-predefined-server-alist just to have a ;; name for the native select method. (when gnus-select-method - (push (cons "native" gnus-select-method) - gnus-predefined-server-alist)) + (add-to-list 'gnus-predefined-server-alist + (cons "native" gnus-select-method))) (if gnus-agent (gnus-agentize)) -- 2.39.2