blob: a0ba9829b681a5f6ea35f94931e54d571f76b3dc (
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
|
;; -*- coding: utf-8; lexical-binding: t; -*-
;; Make startup faster by reducing frequency of garbage collection.
(setq gc-cons-percentage 0.6)
(setq gc-cons-threshold most-positive-fixnum)
;; Make gc pauses faster by decreasing the threhold to 8 MiB (default is
;; 800kB)
(add-hook 'emacs-startup-hook
(lambda () (setq gc-cons-threshold (expt 2 23))))
(add-to-list 'load-path (expand-file-name "lisp" user-emacs-directory))
(defconst *is-a-mac* (eq system-type 'darwin))
(defconst *is-a-linux* (eq system-type 'gnu/linux))
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
(unless (file-exists-p custom-file)
(write-region "" nil custom-file))
(require 'init-package)
(require 'init-utils)
(require 'init-evil)
(require 'init-completion)
(require 'init-minibuffer)
(require 'init-company)
(require 'init-corfu)
(require 'init-flycheck)
(require 'init-org)
(require 'init-lang)
(require 'init-go)
(require 'init-eglot)
(require 'init-racket)
(require 'init-deft)
(require 'init-input-method)
(require 'init-projectile)
(require 'init-markdown)
(require 'init-git)
(require 'init-misc)
(require 'init-appearance)
(add-hook 'after-init-hook
(lambda ()
(require 'server)
(unless (server-running-p) (server-start)))
'append)
(load custom-file)
(require 'init-local nil t)
(provide 'init)
|
