author | Oleksandr Gavenko <gavenkoa@gmail.com> |
Tue, 24 Feb 2015 01:43:57 +0200 | |
changeset 1217 | f6c774c66b4e |
parent 1215 | c7e52e93465a |
child 1228 | 0743afb0b1a5 |
permissions | -rw-r--r-- |
604
9084d12d924d
Fix mode name for elisp files.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
386
diff
changeset
|
1 |
;; -*- mode: emacs-lisp; coding: utf-8; fill-column: 78 -*- |
42
04fd7747bc49
Update copyright notice.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
41
diff
changeset
|
2 |
;; |
278
35338cab99a9
Remove copyright as in public domain.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
277
diff
changeset
|
3 |
;; Written by Oleksandr Gavenko <gavenkoa@gmail.com>, 2008-2010. |
83
d2eaf2ed6d1c
Added basic jabber customization.
gavenkoa@gavenko.bifit.int
parents:
71
diff
changeset
|
4 |
;; |
110
6b6e3f8cb371
Set copyright notice.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
102
diff
changeset
|
5 |
;; This file placed in public domain. |
6b6e3f8cb371
Set copyright notice.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
102
diff
changeset
|
6 |
;; |
351
e30e4bd7e85e
Small spell correction.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
349
diff
changeset
|
7 |
;; For load order see README. |
6 | 8 |
|
92
359f03f8a64b
Move path definition to share place.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
71
diff
changeset
|
9 |
;; ====================================================================== |
359f03f8a64b
Move path definition to share place.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
71
diff
changeset
|
10 |
;; Load path. |
765
bbeae3f53afa
Recursively add dirs from 'my-usr-el-dir' to 'load-path'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
604
diff
changeset
|
11 |
|
bbeae3f53afa
Recursively add dirs from 'my-usr-el-dir' to 'load-path'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
604
diff
changeset
|
12 |
|
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
13 |
(defvar my-usr-lisp-dir |
92
359f03f8a64b
Move path definition to share place.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
71
diff
changeset
|
14 |
(expand-file-name "~/usr/share/emacs/site-lisp") |
359f03f8a64b
Move path definition to share place.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
71
diff
changeset
|
15 |
"Here live additional lisp packages.") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
16 |
(when (file-directory-p my-usr-lisp-dir) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
17 |
(add-to-list 'load-path my-usr-lisp-dir) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
18 |
(let ((default-directory my-usr-lisp-dir)) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
19 |
(normal-top-level-add-subdirs-to-load-path))) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
20 |
|
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
21 |
(unless (boundp 'user-emacs-directory) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
22 |
(setq user-emacs-directory "~/.emacs.d/")) |
765
bbeae3f53afa
Recursively add dirs from 'my-usr-el-dir' to 'load-path'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
604
diff
changeset
|
23 |
|
276
35d90ffc94e7
Load autoloads instead all mode files for speed.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
235
diff
changeset
|
24 |
(defvar my-lisp-dir |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
25 |
(expand-file-name (concat user-emacs-directory "my/")) |
276
35d90ffc94e7
Load autoloads instead all mode files for speed.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
235
diff
changeset
|
26 |
"Here live my lisp packages.") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
27 |
(add-to-list 'load-path my-lisp-dir) |
41
38dda673f17f
Added to be load pre-/post-load files with custom settings.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
37
diff
changeset
|
28 |
|
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
29 |
(setq custom-file (concat user-emacs-directory ".emacs-custom")) |
343
fb177bcb3d6f
Load 'custom-file' before "~/.emacs-my" as some settings can effect on require
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
304
diff
changeset
|
30 |
(if (file-exists-p custom-file) |
fb177bcb3d6f
Load 'custom-file' before "~/.emacs-my" as some settings can effect on require
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
304
diff
changeset
|
31 |
(load custom-file)) |
fb177bcb3d6f
Load 'custom-file' before "~/.emacs-my" as some settings can effect on require
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
304
diff
changeset
|
32 |
|
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
33 |
(defvar my-lisp-autoload (concat user-emacs-directory "loaddefs.el") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
34 |
"Path to autoload for mode files.") |
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
35 |
(defvar my-lisp-auth (concat user-emacs-directory ".emacs-auth") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
36 |
"Path to auth info for Emacs.") |
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
37 |
(defvar my-lisp-autogen (concat user-emacs-directory ".emacs-autogen") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
38 |
"Path to automatically generated config file. It content depend on |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
39 |
installation environment and it was overridden on install.") |
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
40 |
(defvar my-lisp-pre (concat user-emacs-directory ".emacs-pre") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
41 |
"Path to file with pre-settings. Intended for local modifications.") |
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
42 |
(defvar my-lisp-dotemacs (concat user-emacs-directory ".emacs-my") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
43 |
"Path to file with settings. Overwritten on install.") |
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
44 |
(defvar my-lisp-post (concat user-emacs-directory ".emacs-post") |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
45 |
"Path to file with post-settings. Intended for local modifications.") |
41
38dda673f17f
Added to be load pre-/post-load files with custom settings.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
37
diff
changeset
|
46 |
|
1215
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
47 |
(setq save-place-file (concat user-emacs-directory ".emacs-places")) |
c7e52e93465a
Move .emacs files to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1199
diff
changeset
|
48 |
(setq bookmark-default-file (concat user-emacs-directory ".emacs.bmk")) |
1217
f6c774c66b4e
Move .ido.last to user-emacs-directory.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1215
diff
changeset
|
49 |
(setq ido-save-directory-list-file (concat user-emacs-directory ".ido.last")) |
1199
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
50 |
|
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
51 |
(mapc |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
52 |
(lambda (fname) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
53 |
(if (file-exists-p fname) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
54 |
(load fname))) |
dff272add01e
Move all configs to "~/.emacs.d/my".
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
1198
diff
changeset
|
55 |
(list custom-file my-lisp-autogen my-lisp-auth my-lisp-pre my-lisp-autoload my-lisp-dotemacs my-lisp-post)) |