;; Disable auto-save for all file buffers (setq auto-save-default nil) (global-set-key "\C-m" 'newline-and-indent) (global-font-lock-mode t) ;; These are otherwise bound to C-Up and C-Down. To heck with that ;; nonsense, M-n and M-p are unused and analogous to C-f, C-b and M-f, ;; M-b respectively. (global-set-key "\M-p" 'backward-paragraph) (global-set-key "\M-n" 'forward-paragraph) ;; Gentoo *or somebody* made the default too small. ;; Make it too big to overcompensate. (set-default-font "DejaVu Sans Mono-14") ;; Set the frame title to the name of the buffer, if supported. (setq frame-title-format "%b") ;; Currently needed to make Emacs 23 behave sanely. '(diff-jump-to-old-file t) ;; Disable the menu/tool bars when we're using X. (menu-bar-mode -1) (when window-system (tool-bar-mode -1)) ;; And put the damned scroll bar on the correct side. (when window-system (set-scroll-bar-mode 'right)) ;; The most important statement in this file. ;; Do not display a splash screen on startup. (setq inhibit-splash-screen t) ;; Mode Line (setq line-number-mode t) (setq column-number-mode t) (display-time) ;; Don't force a newline at the end of every file. ;; Doing so can screw up HTML, where a newline is more ;; or less equivalent to a space. (setq require-final-newline nil) ;; Unicode ;; (set-language-environment "UTF-8") (prefer-coding-system 'utf-8-unix) (set-terminal-coding-system 'utf-8-unix) (set-keyboard-coding-system 'utf-8-unix) (setq inhibit-iso-escape-detection t) ;; Don't leave backups everywhere. (setq backup-inhibited t) ;; Don't let the file's contents modify my editor, because that needs ;; to be said? More importantly, don't interrupt me to ask me if I ;; want to process the variables that emacs KNOWS are unsafe. (setq enable-local-variables nil) ;; Add the directory containing .emacs to the load-path. (add-to-list 'load-path (file-name-directory (file-truename user-init-file))) ;; Need this for ignore-errors, and some modes. (require 'cl) (load-library "auto-modes") (load-library "mode-hooks") ;; Open private IRC messages in a new buffer. (setq erc-auto-query 'buffer) ;; Never ask me anything, emacs. (setq save-abbrevs nil) (load-library "diff-buffer-against-file") (global-set-key "\C-cd" 'diff-buffer-against-file) (load-library "fix-nonstandard-chars") (load-library "latex-query-replace-regexp-math") ;; Enable dired-find-alternate-file without having to stop ;; and explain myself to Emacs. (put 'dired-find-alternate-file 'disabled nil) ;; Enable the downcase-region function. (put 'downcase-region 'disabled nil) ;; Show trailing whitespace, without having to drop into ;; whitespace-mode. (custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(auth-source-save-behavior nil) '(show-trailing-whitespace t)) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. )