Distribute some variable settings to specific configuration sections
Two configuration changes have been made: - Removed `require-final-newline`, which originally had been set to nil; this is not necessary (I think), because this is a buffer-local variable that is usually set by the respective major mode when necessary; the default value is nil anyway. - Activate `minibuffer-depth-indicate-mode` by default, to signify the depth of recursive minibuffer edits when they happen.
This commit is contained in:
parent
92d43a6306
commit
b5f03ddf96
66
init.el
66
init.el
@ -117,6 +117,7 @@
|
|||||||
;; Activate modes (packages)
|
;; Activate modes (packages)
|
||||||
|
|
||||||
(dolist (mode '(global-undo-tree-mode
|
(dolist (mode '(global-undo-tree-mode
|
||||||
|
minibuffer-depth-indicate-mode
|
||||||
ace-window-display-mode
|
ace-window-display-mode
|
||||||
key-chord-mode
|
key-chord-mode
|
||||||
ivy-mode
|
ivy-mode
|
||||||
@ -353,6 +354,7 @@
|
|||||||
(use-package subr-x
|
(use-package subr-x
|
||||||
:demand t)
|
:demand t)
|
||||||
|
|
||||||
|
;; Encoding: use UTF-8 everywhere
|
||||||
(set-default-coding-systems 'utf-8)
|
(set-default-coding-systems 'utf-8)
|
||||||
(prefer-coding-system 'utf-8)
|
(prefer-coding-system 'utf-8)
|
||||||
(set-terminal-coding-system 'utf-8)
|
(set-terminal-coding-system 'utf-8)
|
||||||
@ -381,18 +383,14 @@
|
|||||||
select-enable-primary t ; TODO select.el
|
select-enable-primary t ; TODO select.el
|
||||||
save-interprogram-paste-before-kill t
|
save-interprogram-paste-before-kill t
|
||||||
mouse-yank-at-point t ; TODO? mouse.el
|
mouse-yank-at-point t ; TODO? mouse.el
|
||||||
require-final-newline nil ; TODO files.el
|
|
||||||
sentence-end-double-space t ; TODO? paragraphs.el
|
|
||||||
scroll-conservatively 10
|
scroll-conservatively 10
|
||||||
|
scroll-preserve-screen-position 'always ; Make M-v undo C-v
|
||||||
message-log-max t
|
message-log-max t
|
||||||
inhibit-eol-conversion nil
|
inhibit-eol-conversion nil
|
||||||
tab-always-indent 'complete ; TODO indent.el
|
tab-always-indent 'complete ; TODO indent.el
|
||||||
completion-cycle-threshold 10 ; TODO minibuffer.el
|
|
||||||
enable-recursive-minibuffers t
|
enable-recursive-minibuffers t
|
||||||
set-mark-command-repeat-pop t
|
set-mark-command-repeat-pop t
|
||||||
large-file-warning-threshold 10000000 ; TODO files.el
|
|
||||||
echo-keystrokes 0.1
|
echo-keystrokes 0.1
|
||||||
delete-by-moving-to-trash t
|
|
||||||
delete-trailing-lines nil
|
delete-trailing-lines nil
|
||||||
x-underline-at-descent-line t
|
x-underline-at-descent-line t
|
||||||
visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow)
|
visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow)
|
||||||
@ -404,13 +402,17 @@
|
|||||||
next-error-message-highlight t
|
next-error-message-highlight t
|
||||||
help-enable-symbol-autoload t ; TODO? help.el
|
help-enable-symbol-autoload t ; TODO? help.el
|
||||||
describe-bindings-outline t ; TODO? help.el
|
describe-bindings-outline t ; TODO? help.el
|
||||||
redisplay-skip-fontification-on-input t)
|
redisplay-skip-fontification-on-input t
|
||||||
|
undo-limit 80000000
|
||||||
|
async-shell-command-buffer 'new-buffer)
|
||||||
|
|
||||||
|
(put 'set-goal-column 'disabled nil)
|
||||||
|
|
||||||
(when (memq system-type '(gnu gnu/linux gnu/kfreebsd))
|
(when (memq system-type '(gnu gnu/linux gnu/kfreebsd))
|
||||||
(setq x-wait-for-event-timeout nil))
|
(setq x-wait-for-event-timeout nil))
|
||||||
|
|
||||||
(when on-windows
|
(when on-windows
|
||||||
;; treat memory for display time ... but hey, this is Windows, memory doesn’t
|
;; Fix: treat memory for display time ... hey, this is Windows, memory doesn’t
|
||||||
;; matter!
|
;; matter!
|
||||||
(setq inhibit-compacting-font-caches t))
|
(setq inhibit-compacting-font-caches t))
|
||||||
|
|
||||||
@ -419,31 +421,6 @@
|
|||||||
face minibuffer-prompt
|
face minibuffer-prompt
|
||||||
cursor-intangible t))
|
cursor-intangible t))
|
||||||
|
|
||||||
;; Make M-v undo C-v
|
|
||||||
(setq scroll-preserve-screen-position 'always)
|
|
||||||
|
|
||||||
;; Backups and Autosave
|
|
||||||
(defvar backup-dir (expand-file-name "ebackup/" emacs-d))
|
|
||||||
(defvar autosave-dir (expand-file-name "eautosave/" emacs-d))
|
|
||||||
(setq make-backup-files t
|
|
||||||
backup-directory-alist (list (cons ".*" backup-dir))
|
|
||||||
auto-save-list-file-prefix autosave-dir
|
|
||||||
auto-save-file-name-transforms `((".*" ,autosave-dir t))
|
|
||||||
version-control t
|
|
||||||
kept-old-versions 2
|
|
||||||
kept-new-versions 4
|
|
||||||
delete-old-versions t
|
|
||||||
vc-make-backup-files t)
|
|
||||||
|
|
||||||
(setq undo-limit 80000000)
|
|
||||||
|
|
||||||
(setq-default async-shell-command-buffer 'new-buffer)
|
|
||||||
|
|
||||||
(put 'set-goal-column 'disabled nil)
|
|
||||||
(put 'upcase-region 'disabled nil)
|
|
||||||
(put 'downcase-region 'disabled nil)
|
|
||||||
(put 'narrow-to-region 'disabled nil)
|
|
||||||
|
|
||||||
;; Fix: disable gconf settings, as it might interfere with ours, see
|
;; Fix: disable gconf settings, as it might interfere with ours, see
|
||||||
;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=25228 and
|
;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=25228 and
|
||||||
;; https://emacs.stackexchange.com/questions/32641/something-changes-the-default-face-in-my-emacs.
|
;; https://emacs.stackexchange.com/questions/32641/something-changes-the-default-face-in-my-emacs.
|
||||||
@ -662,6 +639,12 @@
|
|||||||
|
|
||||||
;; * Text editing
|
;; * Text editing
|
||||||
|
|
||||||
|
(setq sentence-end-double-space t)
|
||||||
|
|
||||||
|
(put 'upcase-region 'disabled nil)
|
||||||
|
(put 'downcase-region 'disabled nil)
|
||||||
|
(put 'narrow-to-region 'disabled nil)
|
||||||
|
|
||||||
(use-package abbrev
|
(use-package abbrev
|
||||||
:init (setq save-abbrevs 'silently
|
:init (setq save-abbrevs 'silently
|
||||||
abbrev-file-name (expand-file-name "private/abbrev_defs"))
|
abbrev-file-name (expand-file-name "private/abbrev_defs"))
|
||||||
@ -2107,6 +2090,22 @@ The password is assumed to be stored at the PASSWORD property."
|
|||||||
|
|
||||||
;; * File Handling
|
;; * File Handling
|
||||||
|
|
||||||
|
(setq large-file-warning-threshold 10000000
|
||||||
|
delete-by-moving-to-trash t)
|
||||||
|
|
||||||
|
;; Backups and Autosave
|
||||||
|
(defvar backup-dir (expand-file-name "ebackup/" emacs-d))
|
||||||
|
(defvar autosave-dir (expand-file-name "eautosave/" emacs-d))
|
||||||
|
(setq make-backup-files t
|
||||||
|
backup-directory-alist (list (cons ".*" backup-dir))
|
||||||
|
auto-save-list-file-prefix autosave-dir
|
||||||
|
auto-save-file-name-transforms `((".*" ,autosave-dir t))
|
||||||
|
version-control t
|
||||||
|
kept-old-versions 2
|
||||||
|
kept-new-versions 4
|
||||||
|
delete-old-versions t
|
||||||
|
vc-make-backup-files t)
|
||||||
|
|
||||||
(use-package dired
|
(use-package dired
|
||||||
:bind (:map dired-mode-map
|
:bind (:map dired-mode-map
|
||||||
("e" . db/dired-ediff-files)
|
("e" . db/dired-ediff-files)
|
||||||
@ -2283,7 +2282,8 @@ The password is assumed to be stored at the PASSWORD property."
|
|||||||
|
|
||||||
(setq suggest-key-bindings t
|
(setq suggest-key-bindings t
|
||||||
extended-command-suggest-shorter t
|
extended-command-suggest-shorter t
|
||||||
completions-detailed t)
|
completions-detailed t
|
||||||
|
completion-cycle-threshold 10)
|
||||||
|
|
||||||
(use-package helm
|
(use-package helm
|
||||||
:ensure t
|
:ensure t
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user