[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Erc-commit] [commit][emacs22] Fix bug in last patch.
From: |
mwolson |
Subject: |
[Erc-commit] [commit][emacs22] Fix bug in last patch. |
Date: |
Sun, 14 Oct 2007 00:48:26 -0400 |
commit ad1e95220d64a2d75aabadb4db042d98a57b43f1
Author: Michael Olson <address@hidden>
Date: Sun Aug 13 22:46:46 2006 +0000
Fix bug in last patch.
git-archimport-id: address@hidden/erc--main--0--patch-41
diff --git a/erc-backend.el b/erc-backend.el
index aeb8d69..a4a038b 100644
--- a/erc-backend.el
+++ b/erc-backend.el
@@ -419,9 +419,10 @@ Additionally, detect whether the IRC process has hung."
(if (> (erc-time-diff (erc-current-time)
erc-server-last-received-time)
erc-server-send-ping-interval)
- ;; if the process is hung, kill it
- (setq erc-server-timed-out t)
- (delete-process erc-server-process)
+ (progn
+ ;; if the process is hung, kill it
+ (setq erc-server-timed-out t)
+ (delete-process erc-server-process))
(erc-server-send (format "PING %.0f" (erc-current-time)))))
;; remove timer if the server buffer has been killed
(let ((timer (assq buf erc-server-ping-timer-alist)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Erc-commit] [commit][emacs22] Fix bug in last patch.,
mwolson <=