# HG changeset patch # User Oleksandr Gavenko # Date 1612039474 -7200 # Node ID 5ed78a45b299b14121bc07fc5c5e29dfa026aec1 # Parent 621215ccccf969bf10b84f5bd1cd3e2e1d619ff0 Grouped startup profiler related code with debug related. diff -r 621215ccccf9 -r 5ed78a45b299 init.el --- a/init.el Sat Jan 30 22:41:51 2021 +0200 +++ b/init.el Sat Jan 30 22:44:34 2021 +0200 @@ -7,7 +7,10 @@ ;; For load order see README. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(message "turn on debugger during loading") +(message "turn on debugger/profiler during loading") + +(when my-profiler-enabled + (profiler-start 'cpu)) (defun my-debug (mode) "With any prefix enables entering into a debuger and shows the @@ -46,9 +49,6 @@ (load my-lisp-auth t) (load my-lisp-pre) -(when my-profiler-enabled - (profiler-start 'cpu)) - (my-lisp--load-usr-home) ;; (setq package-enable-at-startup t) @@ -59,11 +59,11 @@ (load my-lisp-dotemacs t) (load my-lisp-post t) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(message "turn off debugger/profiler after loading") + +(my-debug nil) + (when my-profiler-enabled (profiler-report) (profiler-stop)) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(message "turn off debugger after loading") - -(my-debug nil)