summaryrefslogtreecommitdiff
path: root/emacs.d/custom.el
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-05-06 17:53:14 -0500
committerMarc Coquand <marc@mccd.space>2024-05-06 17:53:14 -0500
commitb697d8c9067a9c16941fccb54c37dea3cc841a0a (patch)
tree78c7566daf87c12eed2ebceb82363cff5b068aec /emacs.d/custom.el
parent203eba06a5d0125d4a33c727a3a56dcb259b940e (diff)
downloadrcm-b697d8c9067a9c16941fccb54c37dea3cc841a0a.tar.gz
rcm-b697d8c9067a9c16941fccb54c37dea3cc841a0a.tar.bz2
rcm-b697d8c9067a9c16941fccb54c37dea3cc841a0a.zip
custom.el
Diffstat (limited to 'emacs.d/custom.el')
-rw-r--r--emacs.d/custom.el192
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)))))