From 3da98e8ee7bffd7b52350dbb4c37fa086f69158f Mon Sep 17 00:00:00 2001 From: czkmt Date: Sun, 5 Dec 1999 12:44:51 +0000 Subject: [PATCH] (gnus): New advice. synchronize `gnus-offline-connected' with `gnus-plugged'. --- lisp/gnus-offline.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/lisp/gnus-offline.el b/lisp/gnus-offline.el index 0510161..fcb1504 100644 --- a/lisp/gnus-offline.el +++ b/lisp/gnus-offline.el @@ -985,6 +985,15 @@ Please check your .emacs or .gnus.el to work nnspool fine.") gnus-offline-interval-time)) (if (= gnus-offline-interval-time 0) (gnus-demon-remove-handler 'gnus-offline-gnus-get-new-news t))) + +;; +;; Code for making Gnus and Gnus Offline cooperate each other. +;; + +(defadvice gnus (after gnus-offline-ad activate) + "Synchronize `gnus-offline-connected' with `gnus-plugged'." + (and (featurep 'gnus-agent) + (setq gnus-offline-connected gnus-plugged))) ;; ;; ;;; gnus-offline.el ends here -- 1.7.10.4