summaryrefslogtreecommitdiffstats
path: root/lisp/init-appearance.el
blob: 467fdca85c4770c84c1f6b3531a2377566a07268 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
;; disable splash
(setq inhibit-startup-message t)

;; hide menubar when not on os x
(when (and (fboundp 'menu-bar-mode) (not (eq system-type 'darwin)))
  (menu-bar-mode -1))

;; hide toolbar
(when (fboundp 'tool-bar-mode)
  (tool-bar-mode -1))

;; hide scrollbar
(when (fboundp 'scroll-bar-mode)
  (scroll-bar-mode -1))

;; disable dialogs
(setq use-dialog-box nil)

;; highlight current line
(use-package hl-line
  :ensure nil ;; package is bundled with emacs
  :config
  (global-hl-line-mode 1))

;; set theme
(use-package doom-themes
  :if (display-graphic-p)
  :config
  (load-theme 'doom-vibrant t))

;; highlight matching parentheses
(use-package paren
  :ensure nil ;; package is bundled with emacs
  :config
  (show-paren-mode 1))

;; highlight lines exceeding fill-column
(use-package whitespace
  :ensure nil ;; package is bundled with emacs

  :diminish whitespace-mode

  :init
  (setq whitespace-style '(face empty lines-tail trailing))
  (setq whitespace-line-column nil)

  :config
  ;; make whitespace-mode respect a mode-specific fill-column value
  (add-hook 'hack-local-variables-hook
            (lambda ()
              (when (derived-mode-p 'prog-mode)
                (whitespace-mode 1)))))

;; disable word wrapping
(setq-default truncate-lines t)

;; display line and column numbers in mode-line
(setq line-number-mode t
      column-number-mode t)

(provide 'init-appearance)