贡献一段代码

如果你用Gnus订阅新闻组和管理邮件，如果你恰好又没有时间每天耗费一点时间去阅读它们，当你某天满怀欣喜地连上NNTP去看文章时才发现，其中很多文章都已经expire了，枉费了按N次n键才有可读的文章。这时候，我们不妨考虑让计算机做这些脏活累活，让它自己跳到第一篇可读的文章。

(defun do-goto-first-available ()
 (gnus-summary-next-article t)
 (move-beginning-of-line 1)
 (when (= 71 (following-char))  ; begin with 'G'?
   (do-goto-first-available)))

(defun goto-first-available ()
 "Skip those expired/canceled articles."
 (interactive)
 (do-goto-first-available))

(add-hook 'gnus-summary-mode-hook
         '(lambda ()
            (global-set-key [f12] 'goto-first-available)))