HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9693d3c
)
(gnus-float-time): Make TIME optional, defaulting to current-time.
author
Glenn Morris
<rgm@gnu.org>
Wed, 2 Sep 2009 06:36:11 +0000
(06:36 +0000)
committer
Glenn Morris
<rgm@gnu.org>
Wed, 2 Sep 2009 06:36:11 +0000
(06:36 +0000)
lisp/gnus/gnus-util.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/gnus/gnus-util.el
b/lisp/gnus/gnus-util.el
index
788fa16
..
fb2cdbc
100644
(file)
--- a/
lisp/gnus/gnus-util.el
+++ b/
lisp/gnus/gnus-util.el
@@
-285,10
+285,11
@@
Symbols are also allowed; their print names are used instead."
(and (= (car fdate) (car date))
(> (nth 1 fdate) (nth 1 date))))))
-(defun gnus-float-time (time)
- "Convert time value TIME to a floating point number."
+(defun gnus-float-time (&optional time)
+ "Convert time value TIME to a floating point number.
+TIME defaults to the current time."
(if (featurep 'xemacs)
- (time-to-seconds
time
)
+ (time-to-seconds
(or time (current-time))
)
(float-time time)))
;;; Keymap macros.