+2001-01-05 06:49:37 Lars Magne Ingebrigtsen <larsi@gnus.org>
+
+ * time-date.el (time-to-number-of-days): New function.
+
2001-01-04 11:06:14 Gregory Chernov <greg@visiontech-dml.com>
* nnslashdot.el (nnslashdot-request-list): Always get the right
(- (/ (1- year) 100)) ; - century years
(/ (1- year) 400)))) ; + Gregorian leap years
+(defun time-to-number-of-days (time)
+ "Return the number of days represented by TIME.
+The number of days will be returned as a floating point number."
+ (/ (+ (* 1.0 65536 (car time)) (cadr time)) (* 60 60 24)))
+
;;;###autoload
(defun safe-date-to-time (date)
"Parse DATE and return a time structure.