use a function for loading into emacs 24 load path

This commit is contained in:
Matthew Boston 2012-03-01 12:42:53 -05:00
parent dc3c44e123
commit b04fee1e57
3 changed files with 8 additions and 4 deletions

View File

@ -2,4 +2,6 @@
(locate-file "solarized-definitions.el" custom-theme-load-path
'("c" "")))
(load-into-load-path)
(create-solarized-theme dark)

View File

@ -458,9 +458,9 @@ the \"Gen RGB\" column in solarized-definitions.el to improve them further."
(apply 'custom-theme-set-faces ',theme-name ',theme-faces)
(provide-theme ',theme-name))))
;;;###autoload
(when load-file-name
(add-to-list 'custom-theme-load-path
(file-name-as-directory (file-name-directory load-file-name))))
(defun load-into-load-path ()
(when load-file-name
(add-to-list 'custom-theme-load-path
(file-name-as-directory (file-name-directory load-file-name)))))
(provide 'solarized-definitions)

View File

@ -2,4 +2,6 @@
(locate-file "solarized-definitions.el" custom-theme-load-path
'("c" "")))
(load-into-load-path)
(create-solarized-theme light)