procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(ecomplete-add-item): In Emacs, use float-time.

Browse source
This commit is contained in:
Glenn Morris 2009-09-02 03:26:30 +00:00
parent e402f45280
commit c62cc3ac0c
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/ecomplete.el
View file

@ -56,7 +56,9 @@
(defun ecomplete-add-item (type key text)
(let ((elems (assq type ecomplete-database))
(now (string-to-number
(format "%.0f" (time-to-seconds (current-time)))))
(format "%.0f" (if (featurep 'xemacs)
(time-to-seconds (current-time))
(float-time)))))
entry)
(unless elems
(push (setq elems (list type)) ecomplete-database))