Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-group.el @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 48d667d6f17f
comparison
equal deleted inserted replaced
109:e183fc049578 110:fe104dbd9147
2621 (defun gnus-group-kill-all-zombies () 2621 (defun gnus-group-kill-all-zombies ()
2622 "Kill all zombie newsgroups." 2622 "Kill all zombie newsgroups."
2623 (interactive) 2623 (interactive)
2624 (setq gnus-killed-list (nconc gnus-zombie-list gnus-killed-list)) 2624 (setq gnus-killed-list (nconc gnus-zombie-list gnus-killed-list))
2625 (setq gnus-zombie-list nil) 2625 (setq gnus-zombie-list nil)
2626 (gnus-dribble-touch)
2626 (gnus-group-list-groups)) 2627 (gnus-group-list-groups))
2627 2628
2628 (defun gnus-group-kill-region (begin end) 2629 (defun gnus-group-kill-region (begin end)
2629 "Kill newsgroups in current region (excluding current point). 2630 "Kill newsgroups in current region (excluding current point).
2630 The killed newsgroups can be yanked by using \\[gnus-group-yank-group]." 2631 The killed newsgroups can be yanked by using \\[gnus-group-yank-group]."