用emacs是会上瘾的，用得越久，瘾越大。

前面提到可以使用如下代码让gnus自动收邮件，可是用了一段时间，发现根本不起作用，一定要在gnus启动之后再运行一遍。

(require ‘gnus-demon)
(setq gnus-use-demon t)
(gnus-demon-add-handler ‘gnus-group-get-new-news 3 1)
(gnus-demon-init)

既然一定要在gnus启动后执行这段代码才有效，那么怎么样自动化呢？用Hook！在源代码里搜寻一番，发现了gnus-started-hook。于是上述代码调整为：

(add-hook 'gnus-started-hook
	  (lambda ()
	    (require 'gnus-demon)
	    (setq gnus-use-demon t)
	    (gnus-demon-add-handler 'gnus-group-get-new-news 3 1)
	    (gnus-demon-init)))