Function: gnus-topic-remove-group
gnus-topic-remove-group is an autoloaded, interactive and
byte-compiled function defined in gnus-topic.el.gz.
Signature
(gnus-topic-remove-group &optional N)
Documentation
Remove the current group from the topic.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-topic.el.gz
(defun gnus-topic-remove-group (&optional n)
"Remove the current group from the topic."
(interactive "P" gnus-topic-mode)
(let ((use-marked (and (not n) (not (and transient-mark-mode mark-active))
gnus-group-marked t))
(groups (gnus-group-process-prefix n)))
(mapc
(lambda (group)
(gnus-group-remove-mark group use-marked)
(let ((topicl (assoc (gnus-current-topic) gnus-topic-alist))
(inhibit-read-only t))
(when (and topicl group)
(gnus-delete-line)
(gnus-delete-first group topicl))
(gnus-topic-update-topic)))
groups)
(gnus-topic-enter-dribble)
(gnus-group-position-point)))