Function: gnus-agent-with-refreshed-group

gnus-agent-with-refreshed-group is a macro defined in gnus-agent.el.gz.

Signature

(gnus-agent-with-refreshed-group GROUP &rest BODY)

Documentation

Perform the body then update the group's line in the group buffer.

Automatically block multiple updates due to recursion.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-agent.el.gz
;;;
;;; Utility functions
;;;

(defmacro gnus-agent-with-refreshed-group (group &rest body)
  "Perform the body then update the group's line in the group buffer.
Automatically block multiple updates due to recursion."
  `(prog1 (let ((gnus-agent-inhibit-update-total-fetched-for t)) ,@body)
     (when (and gnus-agent-need-update-total-fetched-for
		(not gnus-agent-inhibit-update-total-fetched-for))
       (with-current-buffer gnus-group-buffer
         (setq gnus-agent-need-update-total-fetched-for nil)
         (gnus-group-update-group ,group t)))))