blob: cb59ca44b378f0b4d3a2011d21bb52ac7428d14b (
plain)
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
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
|
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(avy-keys '(97 114 115 116 100 104 110 101 105 111))
'(blink-cursor-mode nil)
'(compile-command " ")
'(confirm-nonexistent-file-or-buffer nil)
'(consult-fd-args
'((if
(executable-find "fdfind" 'remote)
"fdfind" "fd")
"--full-path --color=never --hidden"))
'(diff-hl-side 'right)
'(display-line-numbers-major-tick 0)
'(display-line-numbers-minor-tick 0)
'(display-line-numbers-width nil)
'(eglot-extend-to-xref t)
'(eldoc-echo-area-use-multiline-p t)
'(erc-autojoin-mode t)
'(erc-button-mode t)
'(erc-fill-mode t)
'(erc-hide-timestamps nil)
'(erc-irccontrols-mode t)
'(erc-list-mode t)
'(erc-match-mode t)
'(erc-menu-mode t)
'(erc-move-to-prompt-mode t)
'(erc-netsplit-mode t)
'(erc-networks-mode t)
'(erc-nick "mccd")
'(erc-noncommands-mode t)
'(erc-pcomplete-mode t)
'(erc-readonly-mode t)
'(erc-ring-mode t)
'(erc-stamp-mode t)
'(erc-timestamp-format-left "%a %H:%M\12")
'(erc-timestamp-format-right " ")
'(erc-track-minor-mode t)
'(erc-track-mode t)
'(flymake-fringe-indicator-position 'left-fringe)
'(flymake-mode-line-format '(" " flymake-mode-line-counters))
'(fringe-mode '(5 . 5) nil (fringe))
'(god-mode-lighter-string "God")
'(grep-command "ugrep")
'(markdown-code-block-braces t)
'(markdown-enable-highlighting-syntax t)
'(markdown-enable-wiki-links t)
'(markdown-fontify-code-block-default-mode nil)
'(markdown-fontify-code-blocks-natively t)
'(markdown-hide-urls t)
'(markdown-link-space-sub-char "-")
'(markdown-max-image-size '(300 . 300))
'(markdown-wiki-link-search-type '(sub-directories parent-directories project))
'(meow-esc-mode t)
'(meow-global-mode t)
'(mode-line-compact 'long)
'(mode-line-percent-position nil)
'(mode-line-position-line-format '(" "))
'(mu4e-modeline-mode nil)
'(org-babel-load-languages '((emacs-lisp . t) (lisp . t) (shell . t)))
'(org-fold-core-style 'overlays)
'(package-selected-packages
'(slime eat avy monotropic-theme tempel vundo add-node-modules-path prettier password-store vc-fossil eldoc-box mu4e direnv elpher w3m elfeed-protocol elfeed ligature copilot f editorconfig s quelpa-use-package quelpa org-mime org-journal which-key consult orderless vertico markdown-mode smartparens tree-sitter-langs diff-hl magit corfu rg almost-mono-themes git-ps1-mode meow))
'(project-switch-commands
'((project-find-file "Find file" nil)
(project-find-regexp "Find regexp" nil)
(project-find-dir "Find directory" nil)
(project-vc-dir "VC-Dir" nil)
(consult-project-buffer "Find buffer" "b")
(eat-project "Eat terminal" 101)))
'(resize-mini-frames nil)
'(resize-mini-windows t)
'(rg-align-line-number-field-length 2)
'(safe-local-variable-values
'((eval progn
(require 'lisp-mode)
(defun emacs27-lisp-fill-paragraph
(&optional justify)
(interactive "P")
(or
(fill-comment-paragraph justify)
(let
((paragraph-start
(concat paragraph-start "\\|\\s-*\\([(;\"]\\|\\s-:\\|`(\\|#'(\\)"))
(paragraph-separate
(concat paragraph-separate "\\|\\s-*\".*[,\\.]$"))
(fill-column
(if
(and
(integerp emacs-lisp-docstring-fill-column)
(derived-mode-p 'emacs-lisp-mode))
emacs-lisp-docstring-fill-column fill-column)))
(fill-paragraph justify))
t))
(setq-local fill-paragraph-function #'emacs27-lisp-fill-paragraph))
(eval modify-syntax-entry 43 "'")
(eval modify-syntax-entry 36 "'")
(eval modify-syntax-entry 126 "'")
(geiser-repl-per-project-p . t)
(eval with-eval-after-load 'yasnippet
(let
((guix-yasnippets
(expand-file-name "etc/snippets/yas"
(locate-dominating-file default-directory ".dir-locals.el"))))
(unless
(member guix-yasnippets yas-snippet-dirs)
(add-to-list 'yas-snippet-dirs guix-yasnippets)
(yas-reload-all))))
(eval setq-local guix-directory
(locate-dominating-file default-directory ".dir-locals.el"))
(eval add-to-list 'completion-ignored-extensions ".go")))
'(tab-bar-format '(tab-bar-format-align-right tab-bar-format-global))
'(tab-bar-show t)
'(vc-handled-backends '(Git Fossil))
'(vertico-flat-annotate t)
'(vertico-flat-format
'(:multiple
#("{%s}" 0 1
(face minibuffer-prompt)
3 4
(face minibuffer-prompt))
:single
#("[%s]" 0 1
(face minibuffer-prompt)
1 3
(face success)
3 4
(face minibuffer-prompt))
:prompt
#("(%s)" 0 1
(face minibuffer-prompt)
3 4
(face minibuffer-prompt))
:separator
#(" | " 0 3
(face minibuffer-prompt))
:ellipsis
#("…" 0 1
(face minibuffer-prompt))
:no-match "[No match]"))
'(vertico-flat-mode nil)
'(vertico-resize nil)
'(window-resize-pixelwise t))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(diff-hl-insert ((t (:background "green" :foreground "green"))))
'(dired-directory ((t (:inherit font-lock-function-name-face :weight bold))))
'(elfeed-search-feed-face ((t (:foreground "dim gray"))))
'(elfeed-search-tag-face ((t (:slant italic))))
'(elpher-gemini-heading1 ((t (:inherit bold :height 1.2 :family "Iosevka Etoile"))))
'(elpher-gemini-preformatted ((t (:inherit variable-pitch))))
'(erc-action-face ((t (:inherit erc-default-face :weight bold))))
'(erc-default-face ((t (:family "Iosevka Etoile"))))
'(erc-input-face ((t (:foreground "green"))))
'(erc-my-nick-face ((t (:foreground "green" :weight bold))))
'(erc-nick-default-face ((t (:inherit erc-default-face :weight bold))))
'(erc-nick-msg-face ((t (:foreground "medium blue" :weight bold))))
'(erc-notice-face ((t (:inherit erc-default-face :foreground "SlateBlue" :weight bold))))
'(erc-prompt-face ((t (:foreground "Black" :weight bold))))
'(erc-timestamp-face ((t (:inherit erc-default-face :foreground "gray" :weight bold))))
'(eww-form-file ((t (:background "#808080" :foreground "white" :box (:line-width (2 . 2) :style released-button)))))
'(eww-form-submit ((t (:background "#808080" :foreground "white" :box (:line-width (2 . 2) :style released-button)))))
'(eww-valid-certificate ((t (:foreground "black" :weight bold))))
'(font-lock-function-name-face ((t (:weight normal))))
'(font-lock-preprocessor-face ((t (:slant normal))))
'(font-lock-string-face ((t (:foreground "#5A5DA5"))))
'(font-lock-type-face ((t (:slant normal :weight normal))))
'(gnus-header-content ((t (:inherit gnus-header :slant italic))))
'(gnus-header-from ((t (:inherit gnus-header))))
'(gnus-header-name ((t (:inherit gnus-header))))
'(gnus-header-subject ((t (:inherit gnus-header))))
'(god-mode-lighter ((t (:inherit error))))
'(header-line ((t (:inherit mode-line :background "#FFFFFF" :foreground "grey20" :box (:line-width (4 . 4) :color "#FFFFFF" :style flat-button) :underline (:color "grey" :style line :position t) :family "Iosevka Aile"))))
'(highlight ((t (:background "azure2"))))
'(line-number ((t (:foreground "#999999"))))
'(markdown-code-face ((t nil)))
'(markdown-fontify-code-block-natively t)
'(markdown-pre-face ((t (:inherit markdown-code-face))))
'(meow-position-highlight-number ((t (:inherit default :background "grey80" :foreground "white"))))
'(mode-line ((t (:background "#FFFFFF" :foreground "#000000" :box (:line-width (4 . 4) :color "#FFFFFF" :style flat-button) :overline "grey" :height 0.8 :family "Iosevka Aile"))))
'(mode-line-inactive ((t (:background "#ffffff" :foreground "#dddddd" :box (:line-width (4 . 4) :color "#ffffff") :overline "grey" :height 0.8 :family "Iosevka Aile"))))
'(show-paren-match ((t (:background "gainsboro" :foreground "green" :slant oblique :weight bold))))
'(tab-bar ((t (:family "Iosevka Aile" :background "#FFF" :foreground "black" :box (:line-width (4 . 4) :color "#FFF") :height 0.9))))
'(tab-bar-tab ((t (:inherit tab-bar :box nil))))
'(tuareg-font-lock-operator-face ((t nil)))
'(variable-pitch ((t (:family "Iosevka Etoile"))))
'(variable-pitch-text ((t (:inherit variable-pitch :height 1.0)))))
|