149 lines
4 KiB
EmacsLisp
149 lines
4 KiB
EmacsLisp
(add-hook 'emacs-startup-hook
|
|
(lambda ()
|
|
(message "tobmacs loaded in %s."
|
|
(emacs-init-time))))
|
|
|
|
(set-default-coding-systems 'utf-8)
|
|
(customize-set-variable 'visible-bell 1)
|
|
(customize-set-variable 'large-file-warning-threshold 100000000)
|
|
|
|
(add-to-list 'load-path (expand-file-name "modules/" user-emacs-directory))
|
|
|
|
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
|
|
(load custom-file 'noerror)
|
|
|
|
(add-to-list 'native-comp-eln-load-path (expand-file-name "eln-cache/" user-emacs-directory))
|
|
|
|
(setq package-archives
|
|
'(("elpa" . "https://elpa.gnu.org/packages/")
|
|
("elpa-devel" . "https://elpa.gnu.org/devel/")
|
|
("nongnu" . "https://elpa.nongnu.org/nongnu/")
|
|
("melpa" . "https://melpa.org/packages/")))
|
|
|
|
(setq package-archive-priorities
|
|
'(("elpa" . 2)
|
|
("nongnu" . 1)))
|
|
|
|
(package-initialize)
|
|
(unless package-archive-contents
|
|
(package-refresh-contents))
|
|
|
|
(unless (package-installed-p 'use-package)
|
|
(package-install 'use-package))
|
|
|
|
(require 'use-package)
|
|
(setq use-package-always-ensure t)
|
|
|
|
(use-package exec-path-from-shell)
|
|
|
|
(when (memq window-system '(mac ns x))
|
|
(exec-path-from-shell-initialize))
|
|
|
|
;; -----------------------------------------------------------------
|
|
|
|
(use-package consult
|
|
:bind
|
|
(("C-x b" . consult-buffer)
|
|
("C-x 4 b" . consult-buffer-other-window)
|
|
("C-x r b" . consult-bookmark)
|
|
("C-x p b" . consult-project-buffer)
|
|
("M-y" . consult-yank-pop)
|
|
("M-g g" . consult-goto-line)
|
|
("M-g M-g" . consult-goto-line))
|
|
:hook
|
|
(completion-list-mode . consult-preview-at-point-mode))
|
|
|
|
(use-package corfu
|
|
:custom
|
|
(corfu-cycle t)
|
|
(corfu-preselect-first nil)
|
|
(corfu-auto t)
|
|
:init
|
|
(global-corfu-mode))
|
|
|
|
(use-package ef-themes
|
|
:config
|
|
(setq ef-themes-headings
|
|
'((0 . (variable-pitch light 2.0))
|
|
(1 . (variable-pitch light 1.5))
|
|
(2 . (variable-pitch semibold 1.2))
|
|
(t . (variable-pitch semibold 1.0))))
|
|
(setq ef-themes-mixed-fonts t
|
|
ef-themes-variable-pitch-ui t)
|
|
(mapc #'disable-theme custom-enabled-themes)
|
|
(load-theme 'ef-winter :no-confirm))
|
|
|
|
(use-package fontaine
|
|
:config
|
|
(setq fontaine-presets
|
|
'((tiny
|
|
:default-family "Iosevka Comfy Wide Fixed"
|
|
:default-height 70)
|
|
(small
|
|
:default-family "Iosevka Comfy Fixed"
|
|
:default-height 90)
|
|
(regular
|
|
:default-height 130)
|
|
(medium
|
|
:default-height 170)
|
|
(large
|
|
:default-weight semilight
|
|
:default-height 250
|
|
:bold-weight extrabold)
|
|
(presentation
|
|
:default-weight semilight
|
|
:default-height 250
|
|
:bold-weight extrabold)
|
|
(jumbo
|
|
:default-weight semilight
|
|
:default-height 300
|
|
:bold-weight extrabold)
|
|
(t
|
|
:default-family "Iosevka Comfy"
|
|
:default-weight regular
|
|
:default-height 130
|
|
:variable-pitch-family "Iosevka Comfy Duo"
|
|
:bold-weight bold
|
|
:italic-slant italic
|
|
:line-spacing 0.2)))
|
|
(fontaine-set-preset 'regular))
|
|
|
|
(use-package marginalia
|
|
:init
|
|
(marginalia-mode))
|
|
|
|
(use-package modus-themes
|
|
:config
|
|
(setq modus-themes-variable-pitch-headings t
|
|
modus-themes-org-blocks 'tinted-background
|
|
modus-themes-bold-constructs t
|
|
modus-themes-italic-constructs t
|
|
modus-themes-scale-headings t
|
|
modus-themes-completions 'opinionated
|
|
modus-themes-mode-line '(accented borderless)))
|
|
|
|
(use-package orderless
|
|
:custom
|
|
(completion-styles '(orderless basic))
|
|
(completion-category-overrides '((file (styles basic partial-completion)))))
|
|
|
|
(use-package rainbow-delimiters
|
|
:hook
|
|
((emacs-lisp-mode . rainbow-delimiters-mode)
|
|
(clojure-mode . rainbow-delimiters-mode)))
|
|
|
|
(use-package savehist
|
|
:init
|
|
(savehist-mode))
|
|
|
|
(use-package vertico
|
|
:init
|
|
(vertico-mode)
|
|
:config
|
|
(setq vertico-cycle t))
|
|
|
|
(require 'tobmacs-editor)
|
|
(require 'tobmacs-languages)
|
|
(require 'tobmacs-org)
|
|
(require 'tobmacs-vc)
|
|
|