From: czkmt <czkmt>
Date: Sat, 15 Jan 2000 09:01:56 +0000 (+0000)
Subject: (gnus-agent-mode): New advice.
X-Git-Tag: t-gnus-6_14_1-02~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2aabdd9c278509a918f59aa9d011c43a7c4918e9;p=elisp%2Fgnus.git-

(gnus-agent-mode): New advice.
---

diff --git a/lisp/gnus-offline.el b/lisp/gnus-offline.el
index fccf46e..f9bc3eb 100644
--- a/lisp/gnus-offline.el
+++ b/lisp/gnus-offline.el
@@ -428,6 +428,11 @@ Please check your .emacs or .gnus.el to work nnspool fine.")
 	(t
 	 ad-do-it)))
 
+(defadvice gnus-agent-mode (around gnus-offline-advice activate preactivate)
+  "Advice not to close PPP connection."
+  (let (gnus-offline-hangup-function)
+    ad-do-it))
+
 ;;
 ;; Setting up...
 ;;