change scroll setting

settings/pre-settings.el

@@ -2,12 +2,13 @@
 ;;; Commentary:
 ;;; Code:
 ;; count startup time
-(add-hook 'emacs-startup-hook                      ;; Use a hook so the message doesn't get clobbered by other messages.
-          (lambda ()
-            (message
-             "Emacs ready in %s with %d garbage collections."
-             (format "%.2f seconds" (float-time (time-subtract after-init-time before-init-time)))
-             gcs-done)))
+(defun display-startup-time ()
+  "Display the startup time and number of garbage collections."
+  (message "Emacs init loaded in %.2f seconds (Full emacs-startup: %.2fs) with %d garbage collections."
+           (float-time (time-subtract after-init-time before-init-time))
+           (time-to-seconds (time-since before-init-time))
+           gcs-done))
+(add-hook 'emacs-startup-hook #'display-startup-time 100)
 
 ;; omit warnings like: /opt/emacs-conf/lisp/org/oc-basic.el: Warning: ‘buffer-substring’ is an obsolete generalized variable.
 (setq byte-compile-warnings nil)