another autoload try inspired from doom-themes
This commit is contained in:
parent
d9c3dc1fed
commit
d379185947
1 changed files with 7 additions and 6 deletions
|
@ -36,12 +36,13 @@
|
||||||
(require 'hl-sentence)
|
(require 'hl-sentence)
|
||||||
(defvar doom-theme)
|
(defvar doom-theme)
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(when (and (boundp 'custom-theme-load-path) load-file-name )
|
||||||
;; load the local themes
|
(let* ((base (file-name-directory load-file-name))
|
||||||
|
(dir (expand-file-name "themes/" base)))
|
||||||
(let ((dir (file-name-directory (or load-file-name buffer-file-name))))
|
(add-to-list 'custom-theme-load-path
|
||||||
(add-to-list 'custom-theme-load-path (concat dir "/themes")))
|
(or (and (file-directory-p dir) dir)
|
||||||
|
base))))
|
||||||
|
|
||||||
;; configuration
|
;; configuration
|
||||||
(defvar zen-writer-light-theme 'doom-zen-writer
|
(defvar zen-writer-light-theme 'doom-zen-writer
|
||||||
|
|
Loading…
Reference in a new issue