diff options
Diffstat (limited to '')
| -rw-r--r-- | emacs.d/custom.el | 192 |
1 files changed, 192 insertions, 0 deletions
diff --git a/emacs.d/custom.el b/emacs.d/custom.el index e69de29..cb59ca4 100644 --- a/emacs.d/custom.el +++ b/emacs.d/custom.el @@ -0,0 +1,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))))) |