diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 33 |
1 files changed, 31 insertions, 2 deletions
diff --git a/init.el b/init.el index 80a60da..19f6984 100644 --- a/init.el +++ b/init.el | |||
@@ -18,13 +18,21 @@ | |||
18 | ;; | 18 | ;; |
19 | ;;; Code: | 19 | ;;; Code: |
20 | 20 | ||
21 | ;; Add `acdw.el' | 21 | ;;; Add `acdw.el' |
22 | (push (expand-file-name "lisp/" | 22 | (push (expand-file-name "lisp/" |
23 | user-emacs-directory) | 23 | user-emacs-directory) |
24 | load-path) | 24 | load-path) |
25 | |||
26 | (require 'acdw) | 25 | (require 'acdw) |
27 | 26 | ||
27 | ;;; About me | ||
28 | (acdw/set | ||
29 | '((user-full-name "Case Duckworth") | ||
30 | (user-mail-address "acdw@acdw.net") | ||
31 | (calendar-location-name "Baton Rouge, LA") | ||
32 | (calendar-latitude 30.4) | ||
33 | (calendar-longitude -91.1) | ||
34 | (calendar-date-style iso))) | ||
35 | |||
28 | ;;; Good defaults | 36 | ;;; Good defaults |
29 | 37 | ||
30 | ;; Lines | 38 | ;; Lines |
@@ -86,6 +94,27 @@ | |||
86 | (auto-save-list-file-prefix | 94 | (auto-save-list-file-prefix |
87 | ,(acdw/in-dir "auto-save-list/.saves-" t)))) | 95 | ,(acdw/in-dir "auto-save-list/.saves-" t)))) |
88 | (auto-save-visited-mode +1) | 96 | (auto-save-visited-mode +1) |
97 | ;; Auto-revert | ||
98 | (when (require 'autorevert) | ||
99 | (global-auto-revert-mode +1)) | ||
100 | ;; Save place | ||
101 | (when (require 'saveplace) | ||
102 | (acdw/set | ||
103 | `((save-place-file ,(acdw/in-dir "places")) | ||
104 | (save-place-forget-unreadable-files ,(eq acdw/system :home)))) | ||
105 | (save-place-mode +1)) | ||
106 | ;; Recent files | ||
107 | (when (require 'recentf) | ||
108 | (acdw/set | ||
109 | `((recentf-save-file ,(acdw/in-dir "recentf")) | ||
110 | (recentf-max-menu-items 100) | ||
111 | (recentf-max-saved-items nil) | ||
112 | (recentf-auto-cleanup 10 "Cleanup the recentf list when idle for 10s.")) | ||
113 | (add-to-list 'recentf-exclude acdw/dir) | ||
114 | (recentf-mode +1))) | ||
115 | |||
116 | ;; Move the custom file | ||
117 | (acdw/set `((custom-file ,(acdw/in-dir "custom.el")))) | ||
89 | 118 | ||
90 | ;; Cursor | 119 | ;; Cursor |
91 | (acdw/set '((cursor-type bar) | 120 | (acdw/set '((cursor-type bar) |