[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/emacs-lisp timer.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp/emacs-lisp timer.el |
Date: |
Wed, 02 Sep 2009 03:17:20 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/09/02 03:17:19
Modified files:
lisp/emacs-lisp: timer.el
Log message:
Comment.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/timer.el?cvsroot=emacs&r1=1.27&r2=1.28
Patches:
Index: timer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/timer.el,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -b -r1.27 -r1.28
--- timer.el 5 Jan 2009 03:21:11 -0000 1.27
+++ timer.el 2 Sep 2009 03:17:18 -0000 1.28
@@ -1,7 +1,7 @@
;;; timer.el --- run a function with args at some time in future
-;; Copyright (C) 1996, 2001, 2002, 2003, 2004, 2005,
-;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1996, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
+;; 2009 Free Software Foundation, Inc.
;; Maintainer: FSF
@@ -284,7 +284,7 @@
"Calculate number of seconds from when TIMER will run, until TIME.
TIMER is a timer, and stands for the time when its next repeat is scheduled.
TIME is a time-list."
- ;; FIXME: (time-to-seconds (time-subtract (timer--time timer) time))
+ ;; FIXME: (float-time (time-subtract (timer--time timer) time))
(let ((high (- (car time) (timer--high-seconds timer)))
(low (- (nth 1 time) (timer--low-seconds timer))))
(+ low (* high 65536))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/emacs-lisp timer.el,
Glenn Morris <=