-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathinit.el
79 lines (55 loc) · 1.9 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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
;;; init.el --- init file -*- lexical-binding: t; -*-
;; CopyWhat? (©?) 2022 Gustavo Valente
;; Author: Gustavo Valente <[email protected]>
;; Maintainer: Gustavo Valente <[email protected]>
;; Version: 0.0.1
;;; Commentary:
;; init and start process for config.el
;;; Code:
(message "-------------------------")
(message "---| Loading init.el |---")
(message "-------------------------")
;;; set custom-file
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
;;; disable on startup
(if (fboundp 'menu-bar-mode) (menu-bar-mode -1))
(if (fboundp 'tool-bar-mode) (tool-bar-mode -1))
(if (fboundp 'scroll-bar-mode) (scroll-bar-mode -1))
;;; set the config-file to be load by babel
(defvar config-file (expand-file-name "config.org" user-emacs-directory))
;;; include melpa to package-archives
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(package-initialize)
;;; verify use-package
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(require 'use-package)
(require 'org)
(require 'ob-clojure)
(when (file-exists-p config-file)
(org-babel-load-file config-file))
(provide 'init)
;; (setq visible-bell t)
;; (line-number-mode +1)
;; (column-number-mode +1)
;; (require 'package)
;; (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
;; (package-initialize)
;; (defun paredit-hook-fn ()
;; (paredit-mode 1))
;; (use-package paredit
;; :ensure t
;; :config
;; (autoload 'enable-paredit-mode "paredit")
;; :hook ((lisp-mode emacs-lisp-mode) . enable-paredit-mode))
;;
;;
;;
;; (let ((pkg-list '(use-package package exec-path-from-shell)))
;; (dolist (pkg pkg-list)
;; (message (format "looking for %s" pkg))
;; (if (package-installed-p pkg)
;; (message (format "%s installed" pkg))
;; (message (format "%s not installed" pkg)))))