From 1f48f7d236dcf7ec26f0f8317cd26a3475126cb8 Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Sat, 26 Mar 2011 06:11:15 +0800 Subject: [PATCH] Remove unused and erroneous midnight-time-float --- lisp/ChangeLog | 4 ++++ lisp/midnight.el | 6 ------ 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f07ac0953ff..1be233c84b8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2011-03-25 Leo Liu + * midnight.el (midnight-time-float): Remove. Note it calculates + the microsecond component incorrectly and seconds-to-time does the + same job. + * ido.el (ido-read-internal): Simplify with read-from-minibuffer. (ido-completions): Remove unused arguments. (Bug#8329) diff --git a/lisp/midnight.el b/lisp/midnight.el index 9a6b162e986..db8f6c5a3df 100644 --- a/lisp/midnight.el +++ b/lisp/midnight.el @@ -66,12 +66,6 @@ call `cancel-timer' or `timer-activate' on `midnight-timer' instead." ;;; time conversion -(defun midnight-time-float (num) - "Convert the float number of seconds since epoch to the list of 3 integers." - (let* ((div (ash 1 16)) (1st (floor num div))) - (list 1st (floor (- num (* (float div) 1st))) - (round (* 10000000 (mod num 1)))))) - (defun midnight-buffer-display-time (&optional buffer) "Return the time-stamp of BUFFER, or current buffer, as float." (with-current-buffer (or buffer (current-buffer)) -- 2.11.4.GIT