equal
deleted
inserted
replaced
174 (if (boundp 'confirm-kill-emacs) |
174 (if (boundp 'confirm-kill-emacs) |
175 (setq confirm-kill-emacs 'yes-or-no-p)) |
175 (setq confirm-kill-emacs 'yes-or-no-p)) |
176 |
176 |
177 ;; Try to speed things up, especially in VM. |
177 ;; Try to speed things up, especially in VM. |
178 (setq gc-cons-threshold 2000000) |
178 (setq gc-cons-threshold 2000000) |
|
179 |
|
180 ;; Default 'command-history' length too short (in Emacs 23.2 is 30). |
|
181 (setq history-length 200) |
179 |
182 |
180 ;; Don't beep in my headphones! |
183 ;; Don't beep in my headphones! |
181 (setq ring-bell-function '(lambda () "Empty ring-bell-function." nil)) |
184 (setq ring-bell-function '(lambda () "Empty ring-bell-function." nil)) |
182 (setq visible-bell t) ; With default ring-bell-function in text terminal |
185 (setq visible-bell t) ; With default ring-bell-function in text terminal |
183 ; revert screen if press [end] or [home] |
186 ; revert screen if press [end] or [home] |
468 (require 'recentf) |
471 (require 'recentf) |
469 ;; Prevent TRAMP to login on remote host when loading. |
472 ;; Prevent TRAMP to login on remote host when loading. |
470 ;; Its take time and ask passwords! |
473 ;; Its take time and ask passwords! |
471 (setq recentf-auto-cleanup 'never) |
474 (setq recentf-auto-cleanup 'never) |
472 (recentf-mode t) |
475 (recentf-mode t) |
473 (setq recentf-max-saved-items 200) |
476 (setq recentf-max-saved-items 1000) |
474 (global-set-key (kbd "\e\eq") 'recentf-open-files) |
477 (global-set-key (kbd "\e\eq") 'recentf-open-files) |
475 |
478 |
476 ;; ---------------------------------------------------------------------- |
479 ;; ---------------------------------------------------------------------- |
477 ;; revert buffer. |
480 ;; revert buffer. |
478 |
481 |