emacs-diffs
[Top][All Lists]
Advanced

[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))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]