diff options
Diffstat (limited to 'lisp/gnus/ecomplete.el')
| -rw-r--r-- | lisp/gnus/ecomplete.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/ecomplete.el b/lisp/gnus/ecomplete.el index fd9dfa63b6d..c2a22e3230c 100644 --- a/lisp/gnus/ecomplete.el +++ b/lisp/gnus/ecomplete.el @@ -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)) |