diff options
| author | Naoya Yamashita <conao3@gmail.com> | 2018-05-19 14:21:26 +0900 |
|---|---|---|
| committer | Naoya Yamashita <conao3@gmail.com> | 2018-05-19 14:21:26 +0900 |
| commit | db3563945727a11bbd08a8f8a8de435c5a2b3618 (patch) | |
| tree | 4b41d899407ba3a8d6b13a359c4899b22cc17929 /lisp/use-package/use-package-core.el | |
| parent | 642417ac054fc5328ef734ddd7e3dc678cd715b0 (diff) | |
| download | emacs-db3563945727a11bbd08a8f8a8de435c5a2b3618.tar.gz emacs-db3563945727a11bbd08a8f8a8de435c5a2b3618.tar.bz2 emacs-db3563945727a11bbd08a8f8a8de435c5a2b3618.zip | |
fix gethash default value for use-package-statistics-time
float-time expect list like (HIGH LOW USEC PSEC)
> HIGH has the most significant bits of the seconds, while LOW has the
> least significant 16 bits. USEC and PSEC are the microsecond and
> picosecond counts.
by `current-time` in editfns.c
Diffstat (limited to 'lisp/use-package/use-package-core.el')
| -rw-r--r-- | lisp/use-package/use-package-core.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/use-package/use-package-core.el b/lisp/use-package/use-package-core.el index bd18c972303..a88efb91a21 100644 --- a/lisp/use-package/use-package-core.el +++ b/lisp/use-package/use-package-core.el @@ -989,10 +989,10 @@ The date is returned as a string." (defun use-package-statistics-time (package) "Return the time is took for PACKAGE to load." - (+ (float-time (gethash :config-secs package 0)) - (float-time (gethash :init-secs package 0)) - (float-time (gethash :preface-secs package 0)) - (float-time (gethash :use-package-secs package 0)))) + (+ (float-time (gethash :config-secs package '(0 0 0 0))) + (float-time (gethash :init-secs package '(0 0 0 0))) + (float-time (gethash :preface-secs package '(0 0 0 0))) + (float-time (gethash :use-package-secs package '(0 0 0 0))))) (defun use-package-statistics-convert (package) "Return information about PACKAGE. |