| author | Oleksandr Gavenko <gavenkoa@gmail.com> |
| Sun, 01 Mar 2015 20:22:54 +0200 | |
| changeset 1252 | 62509eda174b |
| parent 1241 | 4f22d9fe2e5b |
| child 1254 | 19c7b3be9b3a |
| permissions | -rw-r--r-- |
|
1241
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
1 |
;; -*- mode: emacs-lisp; coding: utf-8; fill-column: 78 -*- |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
2 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
3 |
(defvar my-usr-lisp-dir |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
4 |
(expand-file-name "~/usr/share/emacs/site-lisp") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
5 |
"Here live additional lisp packages.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
6 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
7 |
(unless (boundp 'user-emacs-directory) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
8 |
(setq user-emacs-directory "~/.emacs.d/")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
9 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
10 |
(defvar my-lisp-dir |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
11 |
(expand-file-name (concat user-emacs-directory "my/")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
12 |
"Here live my lisp packages.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
13 |
(add-to-list 'load-path my-lisp-dir) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
14 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
15 |
(defvar my-lisp-autoload (concat my-lisp-dir "loaddefs.el") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
16 |
"Path to autoload for mode files.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
17 |
(defvar my-lisp-auth (concat user-emacs-directory ".emacs-auth") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
18 |
"Path to auth info for Emacs.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
19 |
(defvar my-lisp-autogen (concat user-emacs-directory ".emacs-autogen") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
20 |
"Path to automatically generated config file. It content depend on |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
21 |
installation environment and it was overridden on install.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
22 |
(defvar my-lisp-pre (concat user-emacs-directory ".emacs-pre") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
23 |
"Path to file with pre-settings. Intended for local modifications.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
24 |
(defvar my-lisp-dotemacs (concat user-emacs-directory ".emacs-my") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
25 |
"Path to file with settings. Overwritten on install.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
26 |
(defvar my-lisp-post (concat user-emacs-directory ".emacs-post") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
27 |
"Path to file with post-settings. Intended for local modifications.") |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
28 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
29 |
(setq custom-file (concat user-emacs-directory ".emacs-custom")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
30 |
(setq save-place-file (concat user-emacs-directory ".emacs-places")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
31 |
(setq bookmark-default-file (concat user-emacs-directory ".emacs.bmk")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
32 |
(setq ido-save-directory-list-file (concat user-emacs-directory ".ido.last")) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
33 |
|
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
34 |
(defun my-load.add-my-loadpaths () |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
35 |
(when (file-directory-p my-usr-lisp-dir) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
36 |
(add-to-list 'load-path my-usr-lisp-dir) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
37 |
(let ((default-directory my-usr-lisp-dir)) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
38 |
(normal-top-level-add-subdirs-to-load-path)))) |
|
4f22d9fe2e5b
Byte compile '.emacs-my' and 'my/*.el'.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents:
diff
changeset
|
39 |