fredefox/dotfiles
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Load additional packages declaratively

Browse source
This commit is contained in:
Frederik Hanghøj Iversen 2019-05-15 02:02:42 +02:00
parent 728ac74f3e
commit c499b7d492
1 changed files with 22 additions and 28 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

50
emacs/init.el
View file

@ -24,7 +24,7 @@
'(css-indent-offset 2) '(css-indent-offset 2)
'(custom-safe-themes '(custom-safe-themes
(quote (quote
("c91a5bf65b3f79ab28ab350b1d16c24d8b8bc1201e9c6c2106a60f98bceae754" default))) ("aa81baddda211ffab84a5dc68750ac519d4841be63907a6b5de0cd72e631b172" "c91a5bf65b3f79ab28ab350b1d16c24d8b8bc1201e9c6c2106a60f98bceae754" default)))
'(delete-selection-mode t) '(delete-selection-mode t)
'(dired-isearch-filenames t) '(dired-isearch-filenames t)
'(display-buffer-alist '(display-buffer-alist
@ -126,39 +126,33 @@
;;;; Additional packages ;;;; Additional packages
;;;; Maybe we should use qelpa to mangage these. ;;;; Maybe we should use qelpa to mangage these.
(defvar extra-libs-root (substitute-in-file-name "$XDG_CONFIG_HOME/emacs/lisp/"))
(defvar extra-libs-root "~/.config/emacs/lisp")
(defvar additional-packages (defvar additional-packages
'(("agda-mode" '((agda2-mode . "agda-mode/")
"psc-ide-emacs" (psc-ide . "psc-ide-emacs/")
"org-jira" ;; (org-jira . "org-jira/")
"jira" (jira . "jira/")
"spark" (spark . "spark/")
"chruby"))) (chruby . "chruby/")))
;; (let* ((additional-packages (defun load-additional-packages ()
;; (list "Load the additional packages as specified by additional-packages."
;; "agda-mode" (dolist (spec additional-packages)
;; "psc-ide-emacs")) (let* ((package (car spec))
;; (libs (substitute-in-file-name "$XDG_CONFIG_HOME/emacs/libs")) (package-path (cdr spec))
;; (add-package (lambda (package) (path (concat extra-libs-root package-path)))
;; (let ((p (format "%s/%s" libs package))) (add-to-list 'load-path path)
;; (print p) (require package))))
;; (add-to-list 'load-path p)
;; (add-to-list 'Info-default-directory-list p)))))
;; (mapc add-package additional-packages))
(let ((default-directory (substitute-in-file-name "$XDG_CONFIG_HOME/emacs/lisp/"))) (load-additional-packages)
(normal-top-level-add-subdirs-to-load-path))
(add-to-list 'custom-theme-load-path (defun load-additional-themes ()
(substitute-in-file-name "Load additional themes."
"$XDG_CONFIG_HOME/emacs/lisp/inheritance-theme/")) (add-to-list 'custom-theme-load-path (concat extra-libs-root "inhertitance-theme/"))
(load-theme 'inheritance))
(load-theme 'inheritance) (load-additional-themes)
(require 'agda2-mode)
;; (require 'lsp) ;; (require 'lsp)
;; Shame! `lsp-ui` is emitting: ;; Shame! `lsp-ui` is emitting: