-
-
Notifications
You must be signed in to change notification settings - Fork 129
/
elpa.el
28 lines (24 loc) · 1.06 KB
/
elpa.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
;; (setq package-user-dir
;; (expand-file-name
;; (format "~/.elpa/%s/elpa"
;; (concat emacs-version (when (getenv "MELPA_STABLE") "-stable")))))
;; (package-initialize)
;; (setq package-archives
;; (list (if (getenv "MELPA_STABLE")
;; '("melpa-stable" . "https://stable.melpa.org/packages/")
;; '("melpa" . "http:https://melpa.org/packages/"))
;; '("gnu" . "http:https://elpa.gnu.org/packages/")))
(add-to-list 'load-path default-directory)
;; Silence the loading message
(setq iedit-toggle-key-default nil)
(defun straight-reload-all ()
(interactive)
(let ((build-dir (expand-file-name "straight/build/" user-emacs-directory)))
(dolist (pkg (delete "cl-lib" (delete ".." (delete "." (directory-files build-dir)))))
(let* ((dir (expand-file-name pkg build-dir))
(autoloads (car (directory-files dir t "-autoloads.el"))))
(add-to-list 'load-path dir)
(when autoloads
(load autoloads t 'nomessage))))))
(straight-reload-all)
(message "load-path: %S" load-path)