Conduct minor cleanup of core configuration settings
I am not sure yet whether I want to move configuration for files.el into a separate use-package declaration, but maybe it's cleaner this way and easier to find via imenu?
This commit is contained in:
parent
65748689c6
commit
05904e404e
41
init.el
41
init.el
|
@ -346,7 +346,9 @@
|
||||||
db/after-init-load-files))
|
db/after-init-load-files))
|
||||||
|
|
||||||
|
|
||||||
;; * General configuration
|
;; * Core Configuration
|
||||||
|
|
||||||
|
;; Configuration of C-level variables, startup.el, MULE, simple.el
|
||||||
|
|
||||||
(use-package cl-lib
|
(use-package cl-lib
|
||||||
:demand t)
|
:demand t)
|
||||||
|
@ -361,16 +363,15 @@
|
||||||
(setq buffer-file-coding-system 'utf-8)
|
(setq buffer-file-coding-system 'utf-8)
|
||||||
(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
|
(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
|
||||||
|
|
||||||
|
;; Startup configuration
|
||||||
(setq inhibit-startup-message t
|
(setq inhibit-startup-message t
|
||||||
inhibit-default-init t
|
inhibit-default-init t
|
||||||
frame-inhibit-implied-resize t
|
frame-inhibit-implied-resize t
|
||||||
initial-scratch-message nil
|
initial-scratch-message nil
|
||||||
initial-major-mode 'fundamental-mode
|
initial-major-mode 'fundamental-mode
|
||||||
ring-bell-function #'ignore
|
ring-bell-function #'ignore
|
||||||
garbage-collection-messages nil
|
|
||||||
load-prefer-newer nil ; t breaks `org-reload'
|
load-prefer-newer nil ; t breaks `org-reload'
|
||||||
auth-sources '("~/.authinfo.gpg")
|
)
|
||||||
auth-source-save-behavior nil)
|
|
||||||
|
|
||||||
(fset 'yes-or-no-p 'y-or-n-p)
|
(fset 'yes-or-no-p 'y-or-n-p)
|
||||||
|
|
||||||
|
@ -379,20 +380,20 @@
|
||||||
|
|
||||||
(setq frame-title-format "emacs")
|
(setq frame-title-format "emacs")
|
||||||
|
|
||||||
(setq select-enable-clipboard t
|
(setq select-enable-clipboard t ; TODO select.el
|
||||||
select-enable-primary t
|
select-enable-primary t ; TODO select.el
|
||||||
save-interprogram-paste-before-kill t
|
save-interprogram-paste-before-kill t
|
||||||
mouse-yank-at-point t
|
mouse-yank-at-point t ; TODO? mouse.el
|
||||||
require-final-newline nil
|
require-final-newline nil ; TODO files.el
|
||||||
sentence-end-double-space t
|
sentence-end-double-space t ; TODO? paragraphs.el
|
||||||
scroll-conservatively 10
|
scroll-conservatively 10
|
||||||
message-log-max t
|
message-log-max t
|
||||||
inhibit-eol-conversion nil
|
inhibit-eol-conversion nil
|
||||||
tab-always-indent 'complete
|
tab-always-indent 'complete ; TODO indent.el
|
||||||
completion-cycle-threshold 10
|
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
|
large-file-warning-threshold 10000000 ; TODO files.el
|
||||||
echo-keystrokes 0.1
|
echo-keystrokes 0.1
|
||||||
delete-by-moving-to-trash t
|
delete-by-moving-to-trash t
|
||||||
delete-trailing-lines nil
|
delete-trailing-lines nil
|
||||||
|
@ -400,11 +401,12 @@
|
||||||
visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow)
|
visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow)
|
||||||
history-delete-duplicates t
|
history-delete-duplicates t
|
||||||
track-eol t
|
track-eol t
|
||||||
|
garbage-collection-messages nil
|
||||||
gc-cons-threshold (* 100 1024 1024) ; 100mb
|
gc-cons-threshold (* 100 1024 1024) ; 100mb
|
||||||
read-process-output-max (* 1024 1024) ; 1mb
|
read-process-output-max (* 1024 1024) ; 1mb
|
||||||
next-error-message-highlight t
|
next-error-message-highlight t
|
||||||
help-enable-symbol-autoload t
|
help-enable-symbol-autoload t ; TODO? help.el
|
||||||
describe-bindings-outline t
|
describe-bindings-outline t ; TODO? help.el
|
||||||
redisplay-skip-fontification-on-input t)
|
redisplay-skip-fontification-on-input t)
|
||||||
|
|
||||||
(when (memq system-type '(gnu gnu/linux gnu/kfreebsd))
|
(when (memq system-type '(gnu gnu/linux gnu/kfreebsd))
|
||||||
|
@ -439,8 +441,6 @@
|
||||||
(setq undo-limit 80000000)
|
(setq undo-limit 80000000)
|
||||||
|
|
||||||
(setq-default async-shell-command-buffer 'new-buffer)
|
(setq-default async-shell-command-buffer 'new-buffer)
|
||||||
(add-to-list 'display-buffer-alist
|
|
||||||
'("^\\*Async Shell Command*" . (display-buffer-no-window)))
|
|
||||||
|
|
||||||
(put 'set-goal-column 'disabled nil)
|
(put 'set-goal-column 'disabled nil)
|
||||||
(put 'upcase-region 'disabled nil)
|
(put 'upcase-region 'disabled nil)
|
||||||
|
@ -478,6 +478,10 @@
|
||||||
:commands (appt-activate)
|
:commands (appt-activate)
|
||||||
:init (setq appt-display-mode-line nil))
|
:init (setq appt-display-mode-line nil))
|
||||||
|
|
||||||
|
(use-package auth-sources
|
||||||
|
:init (setq auth-sources '("~/.authinfo.gpg")
|
||||||
|
auth-source-save-behavior nil))
|
||||||
|
|
||||||
(use-package bookmark
|
(use-package bookmark
|
||||||
:init (setq bookmark-default-file (expand-file-name "private/bookmarks"
|
:init (setq bookmark-default-file (expand-file-name "private/bookmarks"
|
||||||
emacs-d)
|
emacs-d)
|
||||||
|
@ -621,7 +625,10 @@
|
||||||
(use-package window
|
(use-package window
|
||||||
:init (setq switch-to-buffer-obey-display-actions t
|
:init (setq switch-to-buffer-obey-display-actions t
|
||||||
switch-to-buffer-in-dedicated-window 'pop
|
switch-to-buffer-in-dedicated-window 'pop
|
||||||
recenter-positions '(top middle bottom)))
|
recenter-positions '(top middle bottom))
|
||||||
|
:config (progn
|
||||||
|
(add-to-list 'display-buffer-alist
|
||||||
|
'("^\\*Async Shell Command*" . (display-buffer-no-window)))))
|
||||||
|
|
||||||
(use-package winner
|
(use-package winner
|
||||||
:commands (winner-mode winner-undo winner-redo))
|
:commands (winner-mode winner-undo winner-redo))
|
||||||
|
|
Loading…
Reference in New Issue