Backport commit 78d45b6 from Emacs master branch

* lisp/org-compat.el (org-float-time):
Use 2-arg defalias, since XEmacs 21.4 doesn't support 3-arg.

Port current-time change to XEmacs 21.4.
78d45b66d41859ab9bdd571fea18fc06a7670911
Paul Eggert
Tue Oct 28 20:21:06 2014 -0700
This commit is contained in:
Paul Eggert 2014-10-28 20:21:06 -07:00 committed by Kyle Meyer
parent 5a01b116a4
commit 6873c9088b
1 changed files with 1 additions and 3 deletions

View File

@ -412,9 +412,7 @@ Pass BUFFER to the XEmacs version of `move-to-column'."
(set-mouse-position frame (1- (frame-width frame)) 0)))))
(defalias 'org-float-time
(if (featurep 'xemacs) 'time-to-seconds 'float-time)
"Convert time value TIME to a floating point number.
TIME defaults to the current time.")
(if (featurep 'xemacs) 'time-to-seconds 'float-time))
;; `user-error' is only available from 24.2.50 on
(unless (fboundp 'user-error)