mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

gnus-start-draft-setup: Move doc string forward.

Browse Source
This commit is contained in:
Katsumi Yamaoka 2010-08-15 23:30:04 +00:00
parent 0005830ccc
commit 4e815860f5
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/gnus/ChangeLog
View File

@ -1,3 +1,7 @@
2010-08-15 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-start.el (gnus-start-draft-setup): Move doc string forward.
2010-08-14 Teodor Zlatanov <tzz@lifelogs.com>
Typo fix "hoo4a" -> "hook".

2
lisp/gnus/gnus-start.el
View File

@ -813,8 +813,8 @@ prompt the user for the name of an NNTP server to use."
(gnus-run-hooks 'gnus-started-hook))))))
(defun gnus-start-draft-setup ()
(interactive)
"Make sure the draft group exists."
(interactive)
(gnus-request-create-group "drafts" '(nndraft ""))
(unless (gnus-group-entry "nndraft:drafts")
(let ((gnus-level-default-subscribed 1))