summaryrefslogtreecommitdiff
path: root/arkta/arkta-cosmetic.el
blob: 96e5498fe86279f7925d499670cce4d996ddd127 (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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
;; -*- lexical-binding: t -*-
;; Copyright © 2018-2025  Uko Koknevics

(use-package ansi-color
  :ensure nil
  :hook (compilation-filter . ansi-color-compilation-filter)
  :custom
  (ansi-color-for-compilation-mode t))

(use-package centaur-tabs
  :ensure t
  :demand t
  :init
  (defun arkta/disable-centaur-tabs-mode ()
    (centaur-tabs-local-mode +1))
  :hook (dashboard-mode . arkta/disable-centaur-tabs-mode)
  :bind (("C-x <C-right>" . centaur-tabs-forward)
         ("C-x <right>"   . centaur-tabs-forward)
         ("C-x <C-left>"  . centaur-tabs-backward)
         ("C-x <left>"    . centaur-tabs-backward))
  :custom
  (centaur-tabs-style "alternate")
  (centaur-tabs-height 35)
  (centaur-tabs-icon-type 'nerd-icons)
  (centaur-tabs-set-icons t)
  (centaur-tabs-gray-out-icons 'buffer)
  (centaur-tabs-set-bar 'over)
  (centaur-tabs-set-close-button nil)
  (centaur-tabs-set-modified-marker t)
  (centaur-tabs-modified-marker "●")
  (centaur-tabs-cycle-scope 'tabs)
  :config
  (centaur-tabs-mode +1))

(use-package display-fill-column-indicator
  :ensure nil
  :demand t
  :init
  (defun arkta/disable-dfci ()
    (display-fill-column-indicator-mode -1))
  :hook (dashboard-mode . arkta/disable-dfci)
  :config
  (global-display-fill-column-indicator-mode +1))

(use-package display-line-numbers
  :ensure nil
  :demand t
  :init
  (defun arkta/disable-dln ()
    (display-line-numbers-mode -1))
  :hook ((dashboard-mode help-mode) . arkta/disable-dln)
  :config
  (global-display-line-numbers-mode +1))

(use-package doom-modeline
  :ensure t
  :custom
  (doom-modeline-bar-width 4)
  (doom-modeline-battery t)
  (doom-modeline-buffer-file-true-name t)
  (doom-modeline-height 25)
  (doom-modeline-hud t)
  (doom-modeline-hud-min-height 6)
  (doom-modeline-icon t)
  (doom-modeline-percent-position nil)
  (doom-modeline-project-detection 'project)
  (doom-modeline-total-line-number t)
  :config
  (doom-modeline-mode +1))

(use-package emojify
  :ensure t
  :config
  (global-emojify-mode +1))

(use-package faces
  :ensure nil
  :custom-face
  (default ((t (:weight ,(if +mac+ 'medium 'regular)
                :slant normal
                :width normal
                :font "Input Mono"
                :height 130)))))

(use-package git-gutter
  :ensure t
  :config
  (global-git-gutter-mode +1))

(use-package hl-line
  :ensure nil
  :config
  (global-hl-line-mode +1))

(use-package hl-todo
  :ensure t
  :config
  (global-hl-todo-mode +1))

(use-package modus-themes
  :ensure t
  :config
  (load-theme 'modus-operandi t))

(use-package nerd-icons
  :ensure t
  :init
  (defun arkta/nerd-icons-maybe-install-fonts ()
    (when (and (display-graphic-p)
               (not (find-font (font-spec :family nerd-icons-font-family))))
      ;; TODO: Maybe also reinstall them every month or so
      (nerd-icons-install-fonts t)))
  :hook ((elpaca-after-init server-after-make-frame) . arkta/nerd-icons-maybe-install-fonts))

(use-package rainbow-delimiters
  :ensure t
  :hook (prog-mode . rainbow-delimiters-mode))

(use-package rainbow-mode
  :ensure t
  :init
  (defun arkta/enable-rainbow ()
    (rainbow-mode +1))
  :hook (prog-mode . arkta/enable-rainbow))

(use-package scroll-bar
  :ensure nil
  :defer t
  :config
  (scroll-bar-mode -1))

(use-package solaire-mode
  :ensure t
  :config
  (solaire-global-mode +1))

(use-package time
  :ensure nil
  :custom
  (display-time-default-load-average nil)
  :config
  (display-time-mode +1))

(use-package tool-bar
  :ensure nil
  :defer t
  :config
  (tool-bar-mode -1))

(provide 'arkta-cosmetic)