     (aim/straight-bootstrap)))
 
 (setq warning-suppress-log-types '((comp) (use-package)))
+
+(add-hook 'emacs-startup-hook
+          (lambda ()
+            (message "Happiness delivered in %s with %d garbage collections."
+                     (format "%.2f seconds"
+                             (float-time (time-subtract after-init-time before-init-time)))
+                     gcs-done)))
 
 ;;; PACKAGES
 

                          (string= system-name "x1c")))

(setq use-nix-epkgs nil)
(setq debug-on-error nil)

(and (boundp 'use-package-report)
     (use-package-report))

(unless (functionp 'json-serialize)
  (error "**** you don't have a json-serialize built-in function ****"))


  (define-key company-active-map (kbd "<tab>") 'company-select-previous)
  (define-key company-active-map (kbd "S-TAB") 'company-select-previous)
  (define-key company-active-map (kbd "<backtab>") 'company-select-previous))

(mapcar #'(lambda (x)
            (define-key global-map (kbd (car x)) (cdr x)))
