diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/time.el | 6 |
2 files changed, 7 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 17f472cd547..b579d17c124 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2008-02-17 Juri Linkov <juri@jurta.org> | ||
| 2 | |||
| 3 | * time.el (emacs-init-time): Use format instead of format-seconds. | ||
| 4 | |||
| 1 | 2008-02-17 Roland Winkler <Roland.Winkler@physik.uni-erlangen.de> | 5 | 2008-02-17 Roland Winkler <Roland.Winkler@physik.uni-erlangen.de> |
| 2 | 6 | ||
| 3 | * textmodes/bibtex.el (bibtex-search-entry): Rename from | 7 | * textmodes/bibtex.el (bibtex-search-entry): Rename from |
diff --git a/lisp/time.el b/lisp/time.el index 7d0e3ebb1b7..d889a7c7531 100644 --- a/lisp/time.el +++ b/lisp/time.el | |||
| @@ -567,9 +567,9 @@ For example, the Unix uptime command format is \"%D, %z%2h:%.2m\"." | |||
| 567 | "Return a string giving the duration of the Emacs initialization." | 567 | "Return a string giving the duration of the Emacs initialization." |
| 568 | (interactive) | 568 | (interactive) |
| 569 | (let ((str | 569 | (let ((str |
| 570 | (format-seconds "%z%S" | 570 | (format "%.1f seconds" |
| 571 | (time-to-seconds | 571 | (time-to-seconds |
| 572 | (time-subtract after-init-time before-init-time))))) | 572 | (time-subtract after-init-time before-init-time))))) |
| 573 | (if (interactive-p) | 573 | (if (interactive-p) |
| 574 | (message "%s" str) | 574 | (message "%s" str) |
| 575 | str))) | 575 | str))) |