Mercurial > hg > xemacs-beta
diff lisp/gnus/gnus-group.el @ 122:d2f30a177268 r20-1b14
Import from CVS: tag r20-1b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:26:03 +0200 |
parents | cca96a509cfe |
children | b980b6286996 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-group.el Mon Aug 13 09:25:31 2007 +0200 +++ b/lisp/gnus/gnus-group.el Mon Aug 13 09:26:03 2007 +0200 @@ -549,7 +549,8 @@ (gnus-define-keys (gnus-group-help-map "H" gnus-group-mode-map) "d" gnus-group-describe-group - "f" gnus-group-fetch-faq) + "f" gnus-group-fetch-faq + "v" gnus-version) (gnus-define-keys (gnus-group-sub-map "S" gnus-group-mode-map) "l" gnus-group-set-current-level @@ -763,7 +764,7 @@ (gnus-update-format-specifications nil 'group 'group-mode) (gnus-update-group-mark-positions) (make-local-hook 'post-command-hook) - (gnus-add-hook 'post-command-hook 'gnus-clear-inboxes-moved nil t) + (add-hook 'post-command-hook 'gnus-clear-inboxes-moved nil t) (when gnus-use-undo (gnus-undo-mode 1)) (run-hooks 'gnus-group-mode-hook))