12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
13 (message "recentf") |
13 (message "recentf") |
14 |
14 |
15 (setq recentf-save-file "~/.recentf") |
15 (setq recentf-save-file "~/.recentf") |
16 (when (eq system-type 'cygwin) |
16 (when (eq system-type 'cygwin) |
17 (setq recentf-save-file "~/.recentf-cygwin") |
17 (setq recentf-save-file "~/.recentf-cygwin")) |
18 ) |
18 |
|
19 (setq recentf-auto-cleanup 'mode) |
|
20 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords! |
|
21 (setq recentf-keep '(file-remote-p file-readable-p)) |
|
22 (setq recentf-exclude ; Use ``M-x recentf-cleanup`` to update recentf-list. |
|
23 '("/devel/[^/]*-\\(orig\\|tmp\\|xxx\\)" |
|
24 "/devel/my-\\(merge\\|pull\\)/")) |
|
25 (setq recentf-max-saved-items 10000) |
|
26 |
19 (require 'recentf) |
27 (require 'recentf) |
20 ;; Prevent TRAMP to login on remote host when loading. |
|
21 ;; Its take time and ask passwords! |
|
22 (setq recentf-auto-cleanup 'never) |
|
23 (recentf-mode t) |
28 (recentf-mode t) |
24 (setq recentf-max-saved-items 10000) |
29 |
25 (global-set-key (kbd "\e\eq") 'recentf-open-files) |
30 (global-set-key (kbd "\e\eq") 'recentf-open-files) |
26 |
31 |
27 (setq recentf-max-menu-items 40) |
32 (setq recentf-max-menu-items 40) |
28 (setq recentf-menu-filter 'recentf-arrange-by-dir) |
33 (setq recentf-show-file-shortcuts-flag nil) |
|
34 |
|
35 ;; (setq recentf-menu-filter 'recentf-arrange-by-dir) ; Too slow with dir widgets. |
|
36 (setq recentf-menu-filter 'recentf-sort-basenames-ascending) |
29 |
37 |
30 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
38 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
31 (message "revert buffer") |
39 (message "revert buffer") |
32 |
40 |
33 (global-set-key [f5] 'revert-buffer) |
41 (global-set-key [f5] 'revert-buffer) |
265 (when (>= emacs-major-version 23) |
273 (when (>= emacs-major-version 23) |
266 (setq split-height-threshold nil) |
274 (setq split-height-threshold nil) |
267 (setq split-width-threshold nil) |
275 (setq split-width-threshold nil) |
268 ) |
276 ) |
269 |
277 |
270 (setq frame-title-format "EMACS: %b") |
278 (setq frame-title-format '("EMACS " system-name ": %b")) |
271 |
279 |
272 ;; Deprecated: `default-header-line-format', `default-mode-line-format'. |
280 ;; Deprecated: `default-header-line-format', `default-mode-line-format'. |
273 ;; For `mode-line-format' default value was used. |
281 ;; For `mode-line-format' default value was used. |
274 (setq-default header-line-format nil) |
282 (setq-default header-line-format nil) |
275 |
283 |