aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-10-26 17:14:08 +0000
committerDave Love2000-10-26 17:14:08 +0000
commita211301f9640daf02dccbf959c6bb8b9dfef438b (patch)
tree9582492ecf745039614d71a6fabf569b4e5d4f04
parent4f926b3e43fdd96feb861f5fafd5cd9920ffa873 (diff)
downloademacs-a211301f9640daf02dccbf959c6bb8b9dfef438b.tar.gz
emacs-a211301f9640daf02dccbf959c6bb8b9dfef438b.zip
2000-10-26 Dirk Meyer <dischi@tzi.de>
* gnus-demon.el (gnus-demon-time-to-step): theHour was set to seconds instead of hour.
-rw-r--r--lisp/gnus/gnus-demon.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-demon.el b/lisp/gnus/gnus-demon.el
index 78d7286d34c..f73b6774dfe 100644
--- a/lisp/gnus/gnus-demon.el
+++ b/lisp/gnus/gnus-demon.el
@@ -2,6 +2,7 @@
2;; Copyright (C) 1995,96,97,98,99 Free Software Foundation, Inc. 2;; Copyright (C) 1995,96,97,98,99 Free Software Foundation, Inc.
3 3
4;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> 4;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
5;; Maintainer: bugs@gnus.org
5;; Keywords: news 6;; Keywords: news
6 7
7;; This file is part of GNU Emacs. 8;; This file is part of GNU Emacs.
@@ -34,7 +35,7 @@
34(require 'nnmail) 35(require 'nnmail)
35(require 'gnus-util) 36(require 'gnus-util)
36(eval-and-compile 37(eval-and-compile
37 (if (string-match "XEmacs" (emacs-version)) 38 (if (featurep 'xemacs)
38 (require 'itimer) 39 (require 'itimer)
39 (require 'timer))) 40 (require 'timer)))
40 41
@@ -152,7 +153,7 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's."
152 (nowParts (decode-time now)) 153 (nowParts (decode-time now))
153 ;; obtain THEN as discrete components 154 ;; obtain THEN as discrete components
154 (thenParts (parse-time-string time)) 155 (thenParts (parse-time-string time))
155 (thenHour (elt thenParts 0)) 156 (thenHour (elt thenParts 2))
156 (thenMin (elt thenParts 1)) 157 (thenMin (elt thenParts 1))
157 ;; convert time as elements into number of seconds since EPOCH. 158 ;; convert time as elements into number of seconds since EPOCH.
158 (then (encode-time 0 159 (then (encode-time 0