From f14c2d3fe50de3c55e7c9684e93cdf5608a00b89 Mon Sep 17 00:00:00 2001 From: Christian Cunningham Date: Tue, 28 May 2024 11:19:22 -0700 Subject: Initial Commit --- nemacs-splash.el | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 nemacs-splash.el (limited to 'nemacs-splash.el') diff --git a/nemacs-splash.el b/nemacs-splash.el new file mode 100644 index 0000000..d9e01c8 --- /dev/null +++ b/nemacs-splash.el @@ -0,0 +1,11 @@ +(switch-to-buffer "*splash*") +(with-current-buffer "*splash*" + (let* ((message "Welcome to nEmacs") + (message-len (length message))) + (insert + (concat + (make-string (/ (- (window-total-width) message-len) 2) ? ) + message + "\n")))) + +(provide 'nemacs-splash) -- cgit v1.2.1