|
|
@ -0,0 +1,81 @@
|
|
|
1
|
;;; better-defaults.el --- Fixing weird quirks and poor defaults
|
|
|
2
|
|
|
|
3
|
;; Copyright © 2013 Phil Hagelberg
|
|
|
4
|
|
|
|
5
|
;; Author: Phil Hagelberg
|
|
|
6
|
;; URL: https://github.com/technomancy/better-defaults
|
|
|
7
|
;; Version: 0.1.2
|
|
|
8
|
;; Created: 2013-04-16
|
|
|
9
|
;; Keywords: convenience
|
|
|
10
|
|
|
|
11
|
;; This file is NOT part of GNU Emacs.
|
|
|
12
|
|
|
|
13
|
;;; Commentary:
|
|
|
14
|
|
|
|
15
|
;; There are a number of unfortunate facts about the way Emacs works
|
|
|
16
|
;; out of the box. While all users will eventually need to learn their
|
|
|
17
|
;; way around in order to customize it to their particular tastes,
|
|
|
18
|
;; this package attempts to address the most obvious of deficiencies
|
|
|
19
|
;; in uncontroversial ways that nearly everyone can agree upon.
|
|
|
20
|
|
|
|
21
|
;; Obviously there are many further tweaks you could do to improve
|
|
|
22
|
;; Emacs, (like those the Starter Kit and similar packages) but this
|
|
|
23
|
;; package focuses only on those that have near-universal appeal.
|
|
|
24
|
|
|
|
25
|
;;; License:
|
|
|
26
|
|
|
|
27
|
;; This program is free software; you can redistribute it and/or modify
|
|
|
28
|
;; it under the terms of the GNU General Public License as published by
|
|
|
29
|
;; the Free Software Foundation; either version 3, or (at your option)
|
|
|
30
|
;; any later version.
|
|
|
31
|
;;
|
|
|
32
|
;; This program is distributed in the hope that it will be useful,
|
|
|
33
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
34
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
35
|
;; GNU General Public License for more details.
|
|
|
36
|
;;
|
|
|
37
|
;; You should have received a copy of the GNU General Public License
|
|
|
38
|
;; along with GNU Emacs; see the file COPYING. If not, write to the
|
|
|
39
|
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
|
40
|
;; Boston, MA 02110-1301, USA.
|
|
|
41
|
|
|
|
42
|
;;; Code:
|
|
|
43
|
|
|
|
44
|
;;;###autoload
|
|
|
45
|
(progn
|
|
|
46
|
(ido-mode t)
|
|
|
47
|
(setq ido-enable-flex-matching t)
|
|
|
48
|
|
|
|
49
|
(menu-bar-mode -1)
|
|
|
50
|
(when (fboundp 'tool-bar-mode)
|
|
|
51
|
(tool-bar-mode -1))
|
|
|
52
|
(when (fboundp 'scroll-bar-mode)
|
|
|
53
|
(scroll-bar-mode -1))
|
|
|
54
|
|
|
|
55
|
(require 'uniquify)
|
|
|
56
|
(setq uniquify-buffer-name-style 'forward)
|
|
|
57
|
|
|
|
58
|
(require 'saveplace)
|
|
|
59
|
(setq-default save-place t)
|
|
|
60
|
|
|
|
61
|
(global-set-key (kbd "M-/") 'hippie-expand)
|
|
|
62
|
(global-set-key (kbd "C-x C-b") 'ibuffer)
|
|
|
63
|
|
|
|
64
|
(global-set-key (kbd "C-s") 'isearch-forward-regexp)
|
|
|
65
|
(global-set-key (kbd "C-r") 'isearch-backward-regexp)
|
|
|
66
|
(global-set-key (kbd "C-M-s") 'isearch-forward)
|
|
|
67
|
(global-set-key (kbd "C-M-r") 'isearch-backward)
|
|
|
68
|
|
|
|
69
|
(show-paren-mode 1)
|
|
|
70
|
(setq-default indent-tabs-mode nil)
|
|
|
71
|
(setq x-select-enable-clipboard t
|
|
|
72
|
x-select-enable-primary t
|
|
|
73
|
save-interprogram-paste-before-kill t
|
|
|
74
|
apropos-do-all t
|
|
|
75
|
mouse-yank-at-point t
|
|
|
76
|
save-place-file (concat user-emacs-directory "places")
|
|
|
77
|
backup-directory-alist `(("." . ,(concat user-emacs-directory
|
|
|
78
|
"backups")))))
|
|
|
79
|
|
|
|
80
|
(provide 'better-defaults)
|
|
|
81
|
;;; better-defaults.el ends here
|