masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-06 12:19:37 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

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) (defun use-package-statistics-time (package)
"Return the time is took for PACKAGE to load." "Return the time is took for PACKAGE to load."
(+ (float-time (gethash :config-secs package 0)) (+ (float-time (gethash :config-secs package '(0 0 0 0)))
(float-time (gethash :init-secs package 0)) (float-time (gethash :init-secs package '(0 0 0 0)))
(float-time (gethash :preface-secs package 0)) (float-time (gethash :preface-secs package '(0 0 0 0)))
(float-time (gethash :use-package-secs package 0)))) (float-time (gethash :use-package-secs package '(0 0 0 0)))))
(defun use-package-statistics-convert (package) (defun use-package-statistics-convert (package)
"Return information about PACKAGE. "Return information about PACKAGE.