master 2aace68a00 5/5: Rename timep to type-break-timep

[Stefan Kangas]

branch: master
commit 2aace68a0084f99d6ff2df005069b68b6d8e9899
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Rename timep to type-break-timep
    
    * lisp/type-break.el (type-break-timep): Rename from 'timep'.
    Retain old name as an obsolete alias.
---
 lisp/type-break.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/type-break.el b/lisp/type-break.el
index 320ccaf94a..bb6382cfe9 100644
--- 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")
+
 
 (provide 'type-break)