No mode-line in *doom* only on startup

This commit is contained in:
Henrik Lissner 2016-05-22 01:13:09 -04:00
parent 42e6b0913d
commit b772e972bd

View file

@ -12,13 +12,19 @@
"The name of the doom scratch buffer.")
(define-derived-mode doom-mode text-mode "DOOM"
"Major mode for special DOOM buffers.")
"Major mode for special DOOM buffers."
:group 'doom)
;; Don't kill the scratch buffer
(add-hook! 'kill-buffer-query-functions
(not (string= doom-buffer-name (buffer-name))))
(add-hook! emacs-startup 'doom-mode-init)
(add-hook! emacs-startup 'doom-mode-startup)
(defun doom-mode-startup ()
(doom-mode-init)
(setq mode-line-format nil))
(defun doom-mode-init (&optional auto-detect-frame)
(unless (buffer-live-p doom-buffer) (setq doom-buffer nil))
(let ((old-scratch (get-buffer "*scratch*")))