Rename timep to type-break-timep

* lisp/type-break.el (type-break-timep): Rename from 'timep'.
Retain old name as an obsolete alias.

diff --git a/lisp/type-break.el b/lisp/type-break.el
index 320ccaf94af60076a585880dbe14c1848d3662d6..bb6382cfe9ef8f1d82c63f179efa67bc886bc62a 100644 (file)
--- a/lisp/type-break.el
+++ b/lisp/type-break.el
@@ -451,7 +451,7 @@ the variable of the same name."
              ;; file saving is left to auto-save
              ))))))
 
-(defun timep (time)
+(defun type-break-timep (time)
   "If TIME is a Lisp time value then return TIME, else return nil."
   (condition-case nil
       (and (float-time time) time)
@@ -475,7 +475,7 @@ the variable of the same name."
 Return nil if the file is missing or if the time is not a Lisp time value."
   (let ((file (type-break-choose-file)))
     (if file
-        (timep ;; returns expected format, else nil
+        (type-break-timep ;; returns expected format, else nil
          (with-current-buffer (find-file-noselect file 'nowarn)
           (condition-case nil
               (save-excursion
@@ -1143,6 +1143,8 @@ With optional non-nil ALL, force redisplay of all mode-lines."
        (and (get-buffer buffer-name)
             (kill-buffer buffer-name))))))
 
+(define-obsolete-function-alias 'timep 'type-break-timep "29.1")
+
 \f
 (provide 'type-break)