From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sun, 10 Feb 2019 03:28:27 +0000 (-0800)
Subject: * lisp/ecomplete.el (ecomplete-add-item): Simplify.
X-Git-Tag: emacs-27.0.90~3640
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f8e9da8bb6424215924b0de008b87c0c28fa930a;p=emacs.git

* lisp/ecomplete.el (ecomplete-add-item): Simplify.
---

diff --git a/lisp/ecomplete.el b/lisp/ecomplete.el
index 9fc3f57833c..fb23ead63f6 100644
--- a/lisp/ecomplete.el
+++ b/lisp/ecomplete.el
@@ -96,7 +96,7 @@ string that was matched."
 (defun ecomplete-add-item (type key text)
   "Add item TEXT of TYPE to the database, using KEY as the identifier."
   (let ((elems (assq type ecomplete-database))
-	(now (string-to-number (format-time-string "%s")))
+	(now (encode-time nil 'integer))
 	entry)
     (unless elems
       (push (setq elems (list type)) ecomplete-database))