Hook your emacs

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

发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据