blob: 78488661f7a7b99c5090136711799882cc696d6b (
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
94
95
96
97
98
|
;;; init-session.el --- configure session -*- lexical-binding: t -*-
;; Author: Franck Cuny <franck@fcuny.net>
;;; Commentary:
;; configure sesson
;;; Code:
(require 'init-util)
(setq create-lockfiles nil) ;; don't use a lock file
(setq confirm-kill-emacs #'yes-or-no-p) ;; ask before killing emacs
(setq minibuffer-message-timeout 0.5) ;; How long to display an echo-area message
(setq ring-bell-function 'ignore) ;; really no bell
(setq tab-always-indent 'complete) ;; when using TAB, always indent
(setq visible-bell nil) ;; no bell
(setq indent-tabs-mode nil) ;; turn off tab indentation
(setq delete-by-moving-to-trash t) ;; delete files by moving them to the trash
(use-package electric
:defer t
:init
(electric-pair-mode 1))
;; bytecomp.el
(setq byte-compile-verbose nil)
;; startup.el
(setq initial-buffer-choice t)
(setq initial-major-mode 'fundamental-mode)
(setq initial-scratch-message "")
(setq user-full-name "Franck Cuny")
(setq user-mail-address "franck@fcuny.net")
(setq add-log-mailing-address "franck@fcuny.net")
(setq history-length 200)
(setq history-delete-duplicates t)
(setq completion-ignored-extensions
'(".class"
".cp"
".elc"
".fmt"
".git/"
".pyc"
".so"
"~"))
;; paragraphs.el
(setq sentence-end-double-space nil)
;; switch to view-mode whenever you are in a read-only buffer (e.g.
;; switched to it using C-x C-q).
(setq view-read-only t)
;; window.el
(setq switch-to-buffer-preserve-window-point t)
;; warnings.el
(setq warning-minimum-log-level :error)
(use-package savehist
:unless noninteractive
:custom
(savehist-additional-variables
'(file-name-history
kmacro-ring
compile-history
compile-command))
(savehist-autosave-interval 60)
(savehist-file (user-data "history"))
(savehist-ignored-variables
'(load-history
flyspell-auto-correct-ring
org-roam-node-history
magit-revision-history
org-read-date-history
query-replace-history
yes-or-no-p-history
kill-ring))
(savehist-mode t)
:config
(savehist-mode 1))
(use-package saveplace
:unless noninteractive
:custom
(save-place-file (user-data "places"))
:config
(save-place-mode 1))
(provide 'init-session)
;;; init-session.el ends here
|
