Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-group.el @ 151:59463afc5666 r20-3b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b2
author cvs
date Mon, 13 Aug 2007 09:37:19 +0200
parents b980b6286996
children 25f70ba0133c
comparison
equal deleted inserted replaced
150:8ebb1c0f0f6f 151:59463afc5666
442 "\M-g" gnus-group-get-new-news-this-group 442 "\M-g" gnus-group-get-new-news-this-group
443 "R" gnus-group-restart 443 "R" gnus-group-restart
444 "r" gnus-group-read-init-file 444 "r" gnus-group-read-init-file
445 "B" gnus-group-browse-foreign-server 445 "B" gnus-group-browse-foreign-server
446 "b" gnus-group-check-bogus-groups 446 "b" gnus-group-check-bogus-groups
447 "F" gnus-find-new-newsgroups 447 "F" gnus-group-find-new-groups
448 "\C-c\C-d" gnus-group-describe-group 448 "\C-c\C-d" gnus-group-describe-group
449 "\M-d" gnus-group-describe-all-groups 449 "\M-d" gnus-group-describe-all-groups
450 "\C-c\C-a" gnus-group-apropos 450 "\C-c\C-a" gnus-group-apropos
451 "\C-c\M-\C-a" gnus-group-description-apropos 451 "\C-c\M-\C-a" gnus-group-description-apropos
452 "a" gnus-group-post-news 452 "a" gnus-group-post-news
687 gnus-group-prev-unread-group-same-level t] 687 gnus-group-prev-unread-group-same-level t]
688 ["Jump to group" gnus-group-jump-to-group t] 688 ["Jump to group" gnus-group-jump-to-group t]
689 ["First unread group" gnus-group-first-unread-group t] 689 ["First unread group" gnus-group-first-unread-group t]
690 ["Best unread group" gnus-group-best-unread-group t]) 690 ["Best unread group" gnus-group-best-unread-group t])
691 ["Delete bogus groups" gnus-group-check-bogus-groups t] 691 ["Delete bogus groups" gnus-group-check-bogus-groups t]
692 ["Find new newsgroups" gnus-find-new-newsgroups t] 692 ["Find new newsgroups" gnus-group-find-new-groups t]
693 ["Transpose" gnus-group-transpose-groups 693 ["Transpose" gnus-group-transpose-groups
694 (gnus-group-group-name)] 694 (gnus-group-group-name)]
695 ["Read a directory as a group..." gnus-group-enter-directory t])) 695 ["Read a directory as a group..." gnus-group-enter-directory t]))
696 696
697 (easy-menu-define 697 (easy-menu-define
3086 group." 3086 group."
3087 (interactive "P") 3087 (interactive "P")
3088 (gnus-check-bogus-newsgroups (and (not silent) (not gnus-expert-user))) 3088 (gnus-check-bogus-newsgroups (and (not silent) (not gnus-expert-user)))
3089 (gnus-group-list-groups)) 3089 (gnus-group-list-groups))
3090 3090
3091 (defun gnus-group-find-new-groups (&optional arg)
3092 "Search for new groups and add them.
3093 Each new group will be treated with `gnus-subscribe-newsgroup-method.'
3094 If ARG (the prefix), use the `ask-server' method to query
3095 the server for new groups."
3096 (interactive "P")
3097 (gnus-find-new-newsgroups arg)
3098 (gnus-group-list-groups))
3099
3091 (defun gnus-group-edit-global-kill (&optional article group) 3100 (defun gnus-group-edit-global-kill (&optional article group)
3092 "Edit the global kill file. 3101 "Edit the global kill file.
3093 If GROUP, edit that local kill file instead." 3102 If GROUP, edit that local kill file instead."
3094 (interactive "P") 3103 (interactive "P")
3095 (setq gnus-current-kill-article article) 3104 (setq gnus-current-kill-article article)