71 lines
2.2 KiB
EmacsLisp
71 lines
2.2 KiB
EmacsLisp
;;; init.el --- Init File -*- lexical-binding: t; no-byte-compile: t -*-
|
|
;;; Commentary:
|
|
;;; Code:
|
|
|
|
(setq load-prefer-newer t
|
|
native-comp-async-report-warnings-errors nil
|
|
byte-compile-warnings '(not free-vars unresolved noruntime lexical make-local))
|
|
|
|
(defvar save-dir (expand-file-name "save" user-emacs-directory))
|
|
(unless (file-exists-p save-dir)
|
|
(make-directory save-dir))
|
|
|
|
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
|
|
|
|
(defgroup djm nil
|
|
"Custom variables added by me."
|
|
:group 'convenience)
|
|
|
|
(add-to-list 'load-path (expand-file-name "lisp" user-emacs-directory))
|
|
(add-to-list 'load-path (expand-file-name "contrib" user-emacs-directory))
|
|
|
|
(defun display-startup-echo-area-message ()
|
|
"Custom version of `display-startup-echo-area-message'."
|
|
(message "%s packages loaded in %0.1f seconds"
|
|
(cdar elpaca--status-counts)
|
|
(string-to-number (emacs-init-time))))
|
|
|
|
(add-hook 'after-init-hook #'(lambda ()
|
|
(setq gc-cons-threshold (* 100 1024 1024)
|
|
gc-cons-percentage 0.1)))
|
|
|
|
;; Some straight functions need to be able to reload everything, so require won't do
|
|
(defun require! (feature &optional filename noerror)
|
|
"Like `require', but if `force-reload' is non-nil, `load' instead.
|
|
`FEATURE', `FILENAME' and `NOERROR' have the same meaning as with require"
|
|
(if (and (boundp 'force-reload) force-reload)
|
|
(load (prin1-to-string feature) noerror nil nil t)
|
|
(require feature filename noerror)))
|
|
|
|
(require 'init-packages)
|
|
(require 'init-ui)
|
|
(require 'init-compile)
|
|
(require 'init-editor)
|
|
(require 'init-search)
|
|
(require 'init-windows)
|
|
(require 'init-project)
|
|
(require 'init-modeline)
|
|
(require 'init-completion)
|
|
(require 'init-minibuffer)
|
|
(require 'init-navigation)
|
|
(require 'init-kill)
|
|
(require 'init-dired)
|
|
(require 'init-smartparens)
|
|
(require 'init-emacs-lisp)
|
|
(require 'init-clojure)
|
|
(require 'init-crux)
|
|
(require 'init-lsp)
|
|
(require 'init-git)
|
|
(require 'init-shell)
|
|
(require 'init-nix)
|
|
(require 'init-org)
|
|
;;(require 'init-latex)
|
|
(require 'init-xml)
|
|
(require 'init-web)
|
|
(require 'init-misc)
|
|
(require 'init-tramp)
|
|
(require 'init-sql)
|
|
(require 'init-local nil t)
|
|
|
|
;;; init.el ends here
|