arch/dotfiles
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

New emacs splash screen

Browse source
This commit is contained in:
Gabriel Simmer 2023-07-25 19:46:27 +01:00
parent 5855f350e4
commit fa14a1e45f
Signed by: arch
GPG key ID: C81B106D46C5B875
2 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
.emacs.d/early-init.el
View file

@ -5,7 +5,7 @@
(with-current-buffer (get-buffer-create "*Welcome*") (with-current-buffer (get-buffer-create "*Welcome*")
(setq truncate-lines t) (setq truncate-lines t)
(let* ((buffer-read-only) (let* ((buffer-read-only)
(image-path "~/.emacs.d/emacs.png") (image-path "~/.emacs.d/splash.png")
(image (create-image image-path)) (image (create-image image-path))
(size (image-size image)) (size (image-size image))
(height (cdr size)) (height (cdr size))
@ -26,7 +26,8 @@
(read-only-mode +1) (read-only-mode +1)
(switch-to-buffer (current-buffer)) (switch-to-buffer (current-buffer))
(local-set-key (kbd "<escape>") 'kill-this-buffer) (local-set-key (kbd "<escape>") 'kill-this-buffer)
(local-set-key (kbd "t") 'vterm))) (local-set-key (kbd "t") 'vterm)
(local-set-key (kbd "c") 'chatgpt-shell)))
(setq initial-scratch-message nil) (setq initial-scratch-message nil)
(setq inhibit-startup-screen t) (setq inhibit-startup-screen t)

BIN
.emacs.d/splash.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 162 KiB