.emacs
author Oleksandr Gavenko <gavenkoa@gmail.com>
Sun, 14 Mar 2010 20:12:11 +0200
changeset 336 a252995f7d6b
parent 304 69d3124ca29c
child 343 fb177bcb3d6f
permissions -rw-r--r--
Move general getting into one place.

;; -*- mode: lisp; coding: utf-8 -*-
;;
;; Written by Oleksandr Gavenko <gavenkoa@gmail.com>, 2008-2010.
;;
;; This file placed in public domain.
;;
;; For loading order see README.

;; ======================================================================
;; Load path.
(defvar my-usr-el-dir
  (expand-file-name "~/usr/share/emacs/site-lisp")
  "Here live additional lisp packages.")
(add-to-list 'load-path my-usr-el-dir t)
(defvar my-lisp-dir
  (expand-file-name "~/.emacs.d/my-lisp")
  "Here live my lisp packages.")
(add-to-list 'load-path my-lisp-dir t)

(defvar my-autoload (concat my-lisp-dir "/autoload-my.el")
  "Path to autoload for mode files.")
(defvar dot-emacs-pre (expand-file-name "~/.emacs-pre")
  "Path to file with pre-loaded custom settings.")
(defvar dot-emacs-post (expand-file-name "~/.emacs-post")
  "Path to file with post-loaded custom settings.")

;; pre-load custom settings
(if (file-exists-p dot-emacs-pre)
    (load dot-emacs-pre))

(if (file-exists-p my-autoload)
    (load my-autoload))

;; load main customization
(load "~/.emacs-my")

;; post-load custom settings
(if (file-exists-p dot-emacs-post)
    (load dot-emacs-post))

(setq custom-file "~/.emacs-custom.el")
(if (file-exists-p custom-file)
    (load custom-file))