Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-group.el @ 32:e04119814345 r19-15b99

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b99
author cvs
date Mon, 13 Aug 2007 08:52:56 +0200
parents ec9a17fef872
children d620409f5eb8
comparison
equal deleted inserted replaced
31:b9328a10c56c 32:e04119814345
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]."