martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix gethash default value for use-package-statistics-time

Browse Source 
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
This commit is contained in:
Naoya Yamashita
2018-05-19 14:21:26 +09:00
parent 642417ac05
commit db35639457
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/use-package/use-package-core.el
View File

@@ -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.