New emacs splash screen
This commit is contained in:
parent
5855f350e4
commit
fa14a1e45f
|
@ -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
BIN
.emacs.d/splash.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 162 KiB |
Loading…
Reference in a new issue