Rename config-path helper function to get-config-path

This commit is contained in:
2014-04-18 16:04:59 +01:00
parent 975b92b63f
commit a004477eff
5 changed files with 41 additions and 41 deletions

26
init.el
View File

@@ -11,25 +11,25 @@
(if (or (getenv "EMACS_GUI_SERVER") window-system) t 'nil))
;; Helper function for config path
(defun config-path(path)
(defun get-config-path(path)
"Appends argument at the end of emacs-config-dir using expand-file-name"
(expand-file-name path emacs-config-dir))
;; Load various config files
(load-file (config-path "env.el"))
(load-file (config-path "packages.el"))
(load-file (config-path "helpers.el"))
(load-file (config-path "mode-customizations.el"))
(load-file (config-path "vendor.el"))
(load-file (config-path "behavior.el"))
(load-file (config-path "appearance.el"))
(load-file (config-path "keybindings.el"))
(load-file (config-path "aliases.el"))
(load-file (config-path "remember.el"))
(load-file (config-path "project-definitions.el"))
(load-file (get-config-path "env.el"))
(load-file (get-config-path "packages.el"))
(load-file (get-config-path "helpers.el"))
(load-file (get-config-path "mode-customizations.el"))
(load-file (get-config-path "vendor.el"))
(load-file (get-config-path "behavior.el"))
(load-file (get-config-path "appearance.el"))
(load-file (get-config-path "keybindings.el"))
(load-file (get-config-path "aliases.el"))
(load-file (get-config-path "remember.el"))
(load-file (get-config-path "project-definitions.el"))
;; Custom variables file
(setq custom-file (config-path "custom-variables.el"))
(setq custom-file (get-config-path "custom-variables.el"))
(load-file custom-file)
;; Initialize packages in packages.el

View File

@@ -3,30 +3,30 @@
;;
;; Programming languages
(load-file (config-path "mode-customizations/ack-mode.el"))
(load-file (config-path "mode-customizations/coffee-mode.el"))
(load-file (config-path "mode-customizations/conf-mode.el"))
(load-file (config-path "mode-customizations/css-mode.el"))
(load-file (config-path "mode-customizations/dired-mode.el"))
(load-file (config-path "mode-customizations/emacs-lisp-mode.el"))
(load-file (config-path "mode-customizations/erlang-mode.el"))
(load-file (config-path "mode-customizations/feature-mode.el"))
(load-file (config-path "mode-customizations/git-commit-mode.el"))
(load-file (config-path "mode-customizations/haml-mode.el"))
(load-file (config-path "mode-customizations/html-mode.el"))
(load-file (config-path "mode-customizations/js-mode.el"))
(load-file (config-path "mode-customizations/lisp-mode.el"))
(load-file (config-path "mode-customizations/makefile-mode.el"))
(load-file (config-path "mode-customizations/markdown-mode.el"))
(load-file (config-path "mode-customizations/php-mode.el"))
(load-file (config-path "mode-customizations/puppet-mode.el"))
(load-file (config-path "mode-customizations/python-mode.el"))
(load-file (config-path "mode-customizations/rhtml-mode.el"))
(load-file (config-path "mode-customizations/ruby-mode.el"))
(load-file (config-path "mode-customizations/sass-mode.el"))
(load-file (config-path "mode-customizations/sh-mode.el"))
(load-file (config-path "mode-customizations/slim-mode.el"))
(load-file (config-path "mode-customizations/yaml-mode.el"))
(load-file (get-config-path "mode-customizations/ack-mode.el"))
(load-file (get-config-path "mode-customizations/coffee-mode.el"))
(load-file (get-config-path "mode-customizations/conf-mode.el"))
(load-file (get-config-path "mode-customizations/css-mode.el"))
(load-file (get-config-path "mode-customizations/dired-mode.el"))
(load-file (get-config-path "mode-customizations/emacs-lisp-mode.el"))
(load-file (get-config-path "mode-customizations/erlang-mode.el"))
(load-file (get-config-path "mode-customizations/feature-mode.el"))
(load-file (get-config-path "mode-customizations/git-commit-mode.el"))
(load-file (get-config-path "mode-customizations/haml-mode.el"))
(load-file (get-config-path "mode-customizations/html-mode.el"))
(load-file (get-config-path "mode-customizations/js-mode.el"))
(load-file (get-config-path "mode-customizations/lisp-mode.el"))
(load-file (get-config-path "mode-customizations/makefile-mode.el"))
(load-file (get-config-path "mode-customizations/markdown-mode.el"))
(load-file (get-config-path "mode-customizations/php-mode.el"))
(load-file (get-config-path "mode-customizations/puppet-mode.el"))
(load-file (get-config-path "mode-customizations/python-mode.el"))
(load-file (get-config-path "mode-customizations/rhtml-mode.el"))
(load-file (get-config-path "mode-customizations/ruby-mode.el"))
(load-file (get-config-path "mode-customizations/sass-mode.el"))
(load-file (get-config-path "mode-customizations/sh-mode.el"))
(load-file (get-config-path "mode-customizations/slim-mode.el"))
(load-file (get-config-path "mode-customizations/yaml-mode.el"))
;; Misc modes
(load-file (config-path "mode-customizations/magit-mode.el"))
(load-file (get-config-path "mode-customizations/magit-mode.el"))

View File

@@ -2,7 +2,7 @@
;; no simple way to create a el-get package. So it's one
;; more thing thats not installed through el-get.
(add-to-list 'load-path (config-path "mode-customizations/erlang"))
(add-to-list 'load-path (get-config-path "mode-customizations/erlang"))
(setq erlang-root-dir "/usr/local")
(setq exec-path (cons "/usr/local/bin" exec-path))
(require 'erlang-start)

View File

@@ -15,7 +15,7 @@
(package-initialize)
;; Load el-get
(add-to-list 'load-path (config-path "el-get/el-get"))
(add-to-list 'load-path (get-config-path "el-get/el-get"))
(require 'el-get)

View File

@@ -1,2 +1,2 @@
;; Load-path
(add-to-list 'load-path (config-path "vendor"))
(add-to-list 'load-path (get-config-path "vendor"))