Use early init to disable some GUI and set fonts

parent a2444789
......@@ -18,19 +18,12 @@ in
enable = true;
recommendedGcSettings = true;
prelude = ''
;; Disable startup message.
(setq inhibit-startup-screen t
inhibit-startup-echo-area-message (user-login-name))
(setq initial-major-mode 'fundamental-mode
initial-scratch-message nil)
;; Disable some GUI distractions.
(tool-bar-mode -1)
(scroll-bar-mode -1)
(menu-bar-mode -1)
(blink-cursor-mode 0)
earlyInit = ''
;; Disable some GUI distractions. We set these manually to avoid starting
;; the corresponding minor modes.
(push '(menu-bar-lines . 0) default-frame-alist)
(push '(tool-bar-lines . nil) default-frame-alist)
(push '(vertical-scroll-bars . nil) default-frame-alist)
;; Set up fonts early.
(set-face-attribute 'default
......@@ -40,6 +33,18 @@ in
(set-face-attribute 'variable-pitch
nil
:family "DejaVu Sans")
'';
prelude = ''
;; Disable startup message.
(setq inhibit-startup-screen t
inhibit-startup-echo-area-message (user-login-name))
(setq initial-major-mode 'fundamental-mode
initial-scratch-message nil)
;; Don't blink the cursor.
(setq blink-cursor-mode nil)
;; Set frame title.
(setq frame-title-format
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment