Mercurial > dotfiles

comparison .emacs @ 22:8715ccb6f61b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Start using textmate.el.
author Augie Fackler <durin42@gmail.com>
date Fri, 12 Dec 2008 09:38:16 -0600
parents b5d75594b356
children 614a83a1c5dd
comparison
equal deleted inserted replaced
21:b465892f75e4 22:8715ccb6f61b
18 (require 'mercurial) 18 (require 'mercurial)
19 19
20 ; Clojure 20 ; Clojure
21 (require 'clojure-auto) 21 (require 'clojure-auto)
22 (setq auto-mode-alist (cons '("\\.clj$" . clojure-mode) auto-mode-alist)) 22 (setq auto-mode-alist (cons '("\\.clj$" . clojure-mode) auto-mode-alist))
23
24 (require 'textmate)
25 (textmate-mode)
26 (textmate-also-ignore "eggs|cover|daisy|.*.pyc")
23 27
24 ; Start the server so that emacsclient will work 28 ; Start the server so that emacsclient will work
25 ; TODO: is there a way to *not* start a server if one was already running? 29 ; TODO: is there a way to *not* start a server if one was already running?
26 (server-start) 30 (server-start)
27 31
90 ) 94 )
91 ) 95 )
92 ; always highlight matching paren 96 ; always highlight matching paren
93 (show-paren-mode 1) 97 (show-paren-mode 1)
94 98
95 ;; Desktop mode to remember buffers
96 (load "desktop")
97 (setq desktop-enable t)
98
99 ;; Automatically revert unedited files that change on the underlying 99 ;; Automatically revert unedited files that change on the underlying
100 ;; system. 100 ;; system.
101 (global-auto-revert-mode) 101 (global-auto-revert-mode)
102 102
103 ;; Key Bindings 103 ;; Key Bindings
105 (global-set-key [(meta backspace)] 'kill-this-buffer) 105 (global-set-key [(meta backspace)] 'kill-this-buffer)
106 ; Save early and often, with only one keystroke 106 ; Save early and often, with only one keystroke
107 (global-set-key [(meta s)] 'save-buffer) 107 (global-set-key [(meta s)] 'save-buffer)
108 ; Typing tab is for lesser editors, make hitting return do that 108 ; Typing tab is for lesser editors, make hitting return do that
109 (global-set-key "\C-m" 'newline-and-indent) 109 (global-set-key "\C-m" 'newline-and-indent)
110 ; M-l makes more sense to me for jumping to a line
111 (global-set-key "\M-l" 'goto-line)
110 ; Sometimes C-h is what Backspace sends in a terminal, and I never use C-h 112 ; Sometimes C-h is what Backspace sends in a terminal, and I never use C-h
111 (global-set-key "\C-h" 'backward-delete-char-untabify) 113 (global-set-key "\C-h" 'backward-delete-char-untabify)
114 ; M-t is what I want for the textmate file finding
115 (global-set-key [(meta t)] 'textmate-goto-file)