mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-06 07:31:13 -08:00
Code Issues Projects Releases Wiki Activity

Use add-to-list instead of push in gnus-1

Browse source 
to avoid duplicate entries.
This commit is contained in:
Leo Liu 2012-02-16 22:33:58 +08:00
parent d1354af0f3
commit 74db95ca36
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/ChangeLog
View file

@ -1,3 +1,7 @@
2012-02-16 Leo Liu <sdl.web@gmail.com>
* gnus-start.el (gnus-1): Avoid duplicate entries.
2012-02-15 Lars Ingebrigtsen <larsi@gnus.org>
* shr.el (shr-remove-trailing-whitespace): Really delete the padding on

4
lisp/gnus/gnus-start.el
View file

@ -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))