Doom: Change the ASCII banner

Something that takes up less rows fits better on small-medium terminals.
A simpler design also fits better with the current GUI aesthetic.
This commit is contained in:
TEC 2021-03-28 23:23:47 +08:00
parent 0528d76b22
commit 028ff67b6d
Signed by: tec
GPG Key ID: 779591AFDB81F06C
1 changed files with 25 additions and 0 deletions

View File

@ -1093,6 +1093,31 @@ At the end, we have a minimal but rather nice splash screen.
#+attr_html: :class invertible :alt The splash screen, just loaded.
[[https://tecosaur.com/lfs/emacs-config/screenshots/splash-screen.png]]
I haven't forgotten about the ASCII banner though! Once again we're going for
something simple.
#+begin_src emacs-lisp
(defun doom-dashboard-draw-ascii-emacs-banner-fn ()
(let* ((banner
'(",---.,-.-.,---.,---.,---."
"|---'| | |,---|| `---."
"`---'` ' '`---^`---'`---'"))
(longest-line (apply #'max (mapcar #'length banner))))
(put-text-property
(point)
(dolist (line banner (point))
(insert (+doom-dashboard--center
+doom-dashboard--width
(concat
line (make-string (max 0 (- longest-line (length line)))
32)))
"\n"))
'face 'doom-dashboard-banner)))
(setq +doom-dashboard-ascii-banner-fn #'doom-dashboard-draw-ascii-emacs-banner-fn)
#+end_src
*** Systemd daemon
For running a systemd service for a Emacs server I have the following
#+name: emacsclient service