blob: 0b9cb3161c74a689599244e86acce13e3ae5deda (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
|
;; use soft tabs
(setq-default indent-tabs-mode nil)
;; make prompts accept y or n
(defalias 'yes-or-no-p #'y-or-n-p)
;; no confirmation for non-existent files or buffers
(setq confirm-nonexistent-file-or-buffer nil)
;; disable audible bell
(setq ring-bell-function #'ignore)
;; scroll one line at a time
(setq mouse-wheel-scroll-amount
'(1
((shift) . 5)
((control))))
;; disable scroll acceleration
(setq mouse-wheel-progressive-speed nil)
;; reload buffers automatically when files change on disk
(use-package autorevert
:ensure nil ;; package is bundled with emacs
:diminish auto-revert-mode
:init
;; revert buffers quietly
(setq auto-revert-verbose nil)
:config
(global-auto-revert-mode 1))
;; integrate with X clipboard
(setq select-enable-clipboard t)
;; ensure clipboard strings are saved into kill ring
(setq save-interprogram-paste-before-kill t)
;; move deleted files to trash
(setq delete-by-moving-to-trash t)
;; show keystrokes immediately
(setq echo-keystrokes 0.1)
;; add directory to buffer name if filename is not unique
(setq uniquify-buffer-name-style 'forward)
;; tetris score file
(setq tetris-score-file (expand-file-name "tetris" user-emacs-directory))
;; automatically determine major-mode for newly created buffers
(setq-default major-mode
(lambda ()
(unless buffer-file-name
(let ((buffer-file-name (buffer-name)))
(set-auto-mode t)))))
;; single space ends a sentence
(setq-default sentence-end-double-space nil)
;; default to 80 chars fill-column
(setq-default fill-column 80)
;; confirm when exiting
(setq confirm-kill-emacs #'y-or-n-p)
;; backup files
(setq make-backup-files t
backup-directory-alist `(("." . ,(expand-file-name "backup"
user-emacs-directory)))
backup-by-copying t
delete-old-versions t
version-control t
vc-make-backup-files t
kept-new-versions 6
kept-old-versions 2)
;; preserve point position when scrolling
(setq scroll-preserve-screen-position 'always)
;; always add newline at the end of the file
(setq require-final-newline t)
;; remember position in previously visited files
(use-package saveplace
:ensure nil ;; package is bundled with emacs
:config
(if (fboundp 'save-place-mode)
;; emacs 25.1 and newer
(save-place-mode 1)
;; emacs 24.5 and older
(setq-default save-place t)))
(provide 'init-sane-defaults)
|