1 ;; Disable auto-save for all file buffers
2 (setq auto-save-default nil)
4 (global-set-key "\C-m" 'newline-and-indent)
5 (global-font-lock-mode t)
7 ;; These are otherwise bound to C-Up and C-Down. To heck with that
8 ;; nonsense, M-n and M-p are unused and analogous to C-f, C-b and M-f,
10 (global-set-key "\M-p" 'backward-paragraph)
11 (global-set-key "\M-n" 'forward-paragraph)
13 ;; Gentoo *or somebody* made the default too small.
14 ;; Make it too big to overcompensate.
15 (set-frame-font "DejaVu Sans Mono-14")
17 ;; Set the frame title to the name of the buffer, if supported.
18 (setq frame-title-format "%b")
20 ;; Disable the menu/tool bars when we're using X.
25 ;; And put the damned scroll bar on the correct side.
27 (set-scroll-bar-mode 'right))
29 ;; The most important statement in this file.
30 ;; Do not display a splash screen on startup.
31 (setq inhibit-splash-screen t)
34 (setq line-number-mode t)
35 (setq column-number-mode t)
39 ;; Don't force a newline at the end of every file.
40 ;; Doing so can screw up HTML, where a newline is more
41 ;; or less equivalent to a space.
42 (setq require-final-newline nil)
46 ;; (set-language-environment "UTF-8")
47 (prefer-coding-system 'utf-8-unix)
48 (set-terminal-coding-system 'utf-8-unix)
49 (set-keyboard-coding-system 'utf-8-unix)
51 (setq inhibit-iso-escape-detection t)
53 ;; Don't leave backups everywhere.
54 (setq backup-inhibited t)
56 ;; Don't let the file's contents modify my editor, because that needs
57 ;; to be said? More importantly, don't interrupt me to ask me if I
58 ;; want to process the variables that emacs KNOWS are unsafe.
59 (setq enable-local-variables nil)
61 ;; Add the directory containing .emacs to the load-path.
62 (add-to-list 'load-path (file-name-directory (file-truename user-init-file)))
64 ;; Need this for ignore-errors, and some modes.
67 (load-library "auto-modes")
68 (load-library "mode-hooks")
71 ;; Open private IRC messages in a new buffer.
72 (setq erc-auto-query 'buffer)
74 ;; Never ask me anything, emacs.
75 (setq save-abbrevs nil)
77 (load-library "diff-buffer-against-file")
78 (global-set-key "\C-cd" 'diff-buffer-against-file)
80 (load-library "fix-nonstandard-chars")
81 (load-library "latex-query-replace-regexp-math")
84 ;; Enable dired-find-alternate-file without having to stop
85 ;; and explain myself to Emacs.
86 (put 'dired-find-alternate-file 'disabled nil)
89 ;; Enable the downcase-region function.
90 (put 'downcase-region 'disabled nil)
92 ;; I want to see trailing whitespace.
93 (custom-set-variables '(show-trailing-whitespace t))