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

Performs the body then updates the group's line in the group buffer. Automatically blocks 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)
  "Performs the body then updates the group's line in the group
buffer.  Automatically blocks 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)))))