From: Leo Liu <sdl.web@gmail.com>
Date: Sun, 17 Feb 2013 16:26:38 +0000 (+0800)
Subject: * net/rcirc.el (rcirc-keepalive): Fix invalid timer error.
X-Git-Tag: emacs-24.3.90~173^2~7^2~4
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=53db1d8b92a31a02f82d2bd52f46a041d3bb82b8;p=emacs.git

* net/rcirc.el (rcirc-keepalive): Fix invalid timer error.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 61b282c7118..77759eee9a1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-02-17  Leo Liu  <sdl.web@gmail.com>
+
+	* net/rcirc.el (rcirc-keepalive): Fix invalid timer error.
+
 2013-02-17  Glenn Morris  <rgm@gnu.org>
 
 	* menu-bar.el (menu-bar-tools-menu): Fix case of EDE entry.
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 086043c2b4a..7c70ded3eaa 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -625,7 +625,8 @@ last ping."
                                            (rcirc-float-time))))))
             (rcirc-process-list))
     ;; no processes, clean up timer
-    (cancel-timer rcirc-keepalive-timer)
+    (when (timerp rcirc-keepalive-timer)
+      (cancel-timer rcirc-keepalive-timer))
     (setq rcirc-keepalive-timer nil)))
 
 (defun rcirc-handler-ctcp-KEEPALIVE (process target sender message)