1 ;; -*- mode: lisp; coding: cp1251 -*- |
1 ;; -*- mode: lisp; coding: cp1251 -*- |
2 ;; |
2 ;; |
3 ;; Copyright (C) 2008 by Oleksandr Gavenko <gavenkoa@gmail.com> |
3 ;; Copyright (C) 2008 by Oleksandr Gavenko <gavenkoa@gmail.com> |
4 ;; |
4 ;; |
5 ;; ~/.emacs firstly load ~/.emacs-my-pre, then ~/.emacs-my, then ~/.emacs-my-post. |
5 ;; ~/.emacs firstly load ~/.emacs-pre, then ~/.emacs-my, then ~/.emacs-post. |
6 |
6 |
7 ;; ====================================================================== |
7 ;; ====================================================================== |
8 ;; Load path. |
8 ;; Load path. |
9 (defvar my-el-dir |
9 (defvar my-el-dir |
10 (expand-file-name "~/.el") |
10 (expand-file-name "~/.el") |
14 "Here live additional lisp packages.") |
14 "Here live additional lisp packages.") |
15 |
15 |
16 (add-to-list 'load-path my-el-dir) |
16 (add-to-list 'load-path my-el-dir) |
17 (add-to-list 'load-path my-usr-el-dir) |
17 (add-to-list 'load-path my-usr-el-dir) |
18 |
18 |
19 (defvar dot-emacs-my-pre (expand-file-name "~/.emacs-my-pre") |
19 (defvar dot-emacs-pre (expand-file-name "~/.emacs-pre") |
20 "Path to file with pre-loaded custom settings.") |
20 "Path to file with pre-loaded custom settings.") |
21 (defvar dot-emacs-my-post (expand-file-name "~/.emacs-my-post") |
21 (defvar dot-emacs-post (expand-file-name "~/.emacs-post") |
22 "Path to file with post-loaded custom settings.") |
22 "Path to file with post-loaded custom settings.") |
23 |
23 |
24 ;; pre-load custom settings |
24 ;; pre-load custom settings |
25 (if (file-exists-p dot-emacs-my-pre) |
25 (if (file-exists-p dot-emacs-pre) |
26 (load dot-emacs-my-pre)) |
26 (load dot-emacs-pre)) |
27 |
27 |
28 ;; load main customization |
28 ;; load main customization |
29 (load "~/.emacs-my") |
29 (load "~/.emacs-my") |
30 |
30 |
31 ;; post-load custom settings |
31 ;; post-load custom settings |
32 (if (file-exists-p dot-emacs-my-post) |
32 (if (file-exists-p dot-emacs-post) |
33 (load dot-emacs-my-post)) |
33 (load dot-emacs-post)) |
34 |
34 |
35 (custom-set-variables |
35 (custom-set-variables |
36 ;; custom-set-variables was added by Custom. |
36 ;; custom-set-variables was added by Custom. |
37 ;; If you edit it by hand, you could mess it up, so be careful. |
37 ;; If you edit it by hand, you could mess it up, so be careful. |
38 ;; Your init file should contain only one such instance. |
38 ;; Your init file should contain only one such instance. |