mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

Remove some Emacs 19 compat code

Browse Source 
* lisp/type-break.el (type-break-time-stamp): Remove Emacs 19
compat code.
This commit is contained in:
Stefan Kangas 2020-10-16 15:26:37 +02:00
parent fd5c08892e
commit 9056e6392a
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/type-break.el
View File

@ -956,11 +956,7 @@ FRAC should be the inverse of the fractional value; for example, a value of
sum))
(defun type-break-time-stamp (&optional when)
(if (fboundp 'format-time-string)
(format-time-string type-break-time-stamp-format when)
;; Emacs 19.28 and prior do not have format-time-string.
;; In that case, result is not customizable. Upgrade today!
(format "[%s] " (substring (current-time-string when) 11 16))))
(format-time-string type-break-time-stamp-format when))
(defun type-break-format-time (secs)
(let ((mins (/ secs 60)))