From b2106793fbce8f403121a8862d65bb7362db581a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= <msyds@deertopia.net>
Date: Sat, 20 Sep 2025 14:04:35 -0600
Subject: [PATCH] feat(emacs): display startup time

---
 modules/home/users/msyds/emacs/init.el             |  3 ++-
 .../msyds/emacs/lisp/syd/display-startup-time.el   | 14 ++++++++++++++
 2 files changed, 16 insertions(+), 1 deletion(-)
 create mode 100644 modules/home/users/msyds/emacs/lisp/syd/display-startup-time.el

diff --git a/modules/home/users/msyds/emacs/init.el b/modules/home/users/msyds/emacs/init.el
index e1d162b..cb1f311 100644
--- a/modules/home/users/msyds/emacs/init.el
+++ b/modules/home/users/msyds/emacs/init.el
@@ -44,7 +44,8 @@
     syd/ptemplate
     syd/popups
     syd/pdf
-    syd/project))
+    syd/project
+    syd/display-startup-time))
 
 (defun syd-random-permutation (lst &optional seed)
   "Return a random permutation of list LST using SEED as the random state.  The
diff --git a/modules/home/users/msyds/emacs/lisp/syd/display-startup-time.el b/modules/home/users/msyds/emacs/lisp/syd/display-startup-time.el
new file mode 100644
index 0000000..ff341fe
--- /dev/null
+++ b/modules/home/users/msyds/emacs/lisp/syd/display-startup-time.el
@@ -0,0 +1,14 @@
+;;; -*- lexical-binding: t; -*-
+
+(defun syd-display-startup-time ()
+  (message "Emacs loaded in %s with %d garbage collections."
+           (format "%.3f seconds"
+                   (float-time
+                    (time-subtract after-init-time before-init-time)))
+           gcs-done))
+
+(use-package emacs
+  :hook
+  (emacs-startup-hook . syd-display-startup-time))
+
+(provide 'syd/display-startup-time)