-
Notifications
You must be signed in to change notification settings - Fork 0
/
init.el
59 lines (49 loc) · 1.63 KB
/
init.el
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
52
53
54
55
56
57
58
59
;;; init.el --- Description -*- lexical-binding: t; -*-
;;
;; Copyright (C) 2022 Artin Ghasivand
;;
;; Author: Artin Ghasivand <[email protected]>
;; Maintainer: Artin Ghasivand <[email protected]>
;; Created: August 05, 2022
;; Modified: August 05, 2022
;; Version: 0.0.1
;;; Code:
(setq gc-cons-threshold (* 50 1000 1000))
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name
"straight/repos/straight.el/bootstrap.el"
(or (bound-and-true-p straight-base-dir)
user-emacs-directory)))
(bootstrap-version 7))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
(setq straight-profiles '(('default . "default.el")
('tried-and-true . "tried-and-true.el")))
(setq straight-current-profile 'default)
(straight-use-package 'org)
(use-package exec-path-from-shell
:straight t
:config
(setq exec-path-from-shell-arguments nil)
(exec-path-from-shell-initialize))
(org-babel-load-file
(expand-file-name
"config.org"
user-emacs-directory))
(setq read-process-output-max (* 1024 1024))
(setq emacs-started nil)
(add-hook 'emacs-startup-hook
(lambda ()
(message "Emacs loaded in %s with %d garbage collections."
(format "%.3f seconds"
(float-time
(time-subtract after-init-time before-init-time)))
gcs-done)
(setq emacs-started t)))