public
Description: Phil Hagelberg's personal dotfiles collection: the product of years of accumulated obsessive minor tweaks. Mostly Emacs Lisp.
Homepage: http://technomancy.us
Clone URL: git://github.com/technomancy/dotfiles.git
ruby-mode tweaks, rcirc reconnect, and an irb fix
technomancy (author)
Fri May 16 16:07:00 -0700 2008
commit  30bde7419f63f96bf84389bcf6be4875a6d76276
tree    6fa0e959b1b8184442531094742313144bab986e
parent  0b746ebbe30b9ce07a69ff2e4b75a1d93bdd2baf
...
12
13
14
 
 
15
...
12
13
14
15
16
17
0
@@ -12,3 +12,5 @@
0
   (shell-command "ruby ~/bin/morselight.rb %s" (shell-quote-argument text)))
0
 
0
 (add-hook 'jabber-alert-message-hooks 'jabber-notify-message)
0
+
0
+;; TODO: look into using same-window-regexps to make a jabber-only window.
0
\ No newline at end of file
...
101
102
103
 
 
 
 
 
104
105
106
...
101
102
103
104
105
106
107
108
109
110
111
0
@@ -101,6 +101,11 @@
0
         w3m-use-favicon
0
         w3m-use-toolbar))
0
 
0
+;; nxhtml stuff
0
+(setq mumamo-chunk-coloring 'submode-colored
0
+ nxhtml-skip-welcome t
0
+ rng-nxml-auto-validate-flag nil)
0
+
0
 ;;; Cosmetics
0
 
0
 (defface my-red-face
...
125
126
127
128
129
130
131
132
133
134
135
 
136
137
138
...
125
126
127
 
 
 
 
 
128
 
 
129
130
131
132
0
@@ -125,14 +125,8 @@
0
 
0
 (setq ri-ruby-script (expand-file-name "~/.emacs.d/ri-emacs.rb"))
0
 
0
-;; nxhtml stuff
0
-(setq mumamo-chunk-coloring 'submode-colored
0
- nxhtml-skip-welcome t
0
- rng-nxml-auto-validate-flag nil)
0
-
0
 (font-lock-add-keywords
0
- ' ruby-mode
0
- ruby-mode
0
+ 'ruby-mode
0
  '(("\\<\\(FIX\\|TODO\\|FIXME\\|HACK\\|REFACTOR\\):"
0
     1 font-lock-warning-face t)))
0
 
...
4
5
6
 
 
 
7
8
9
...
31
32
33
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
34
35
36
...
4
5
6
7
8
9
10
11
12
...
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
0
@@ -4,6 +4,9 @@
0
 ;(setq rcirc-authinfo '(("freenode" nickserv "technomancy" "password")))
0
 
0
 (setq rcirc-server-alist '(("irc.freenode.net" (:channels ("#emacs" "#seattle.rb")))))
0
+
0
+(setq rcirc-startup-channels '("#emacs" "#seattle.rb"))
0
+
0
 (setq rcirc-fill-column 72)
0
 (add-hook 'rcirc-mode-hook (lambda () (rcirc-track-minor-mode 1)))
0
 
0
@@ -31,5 +34,28 @@
0
 
0
 (add-hook 'rcirc-print-hooks 'rcirc-notify-nick)
0
 
0
+(defun-rcirc-command reconnect (arg)
0
+ "Reconnect the server process."
0
+ (interactive "i")
0
+ (unless process
0
+ (error "There's no process for this target"))
0
+ (let* ((server (car (process-contact process)))
0
+ (port (process-contact process :service))
0
+ (nick (rcirc-nick process))
0
+ channels query-buffers)
0
+ (dolist (buf (buffer-list))
0
+ (with-current-buffer buf
0
+ (when (eq process (rcirc-buffer-process))
0
+ (remove-hook 'change-major-mode-hook
0
+ 'rcirc-change-major-mode-hook)
0
+ (if (rcirc-channel-p rcirc-target)
0
+ (setq channels (cons rcirc-target channels))
0
+ (setq query-buffers (cons buf query-buffers))))))
0
+ (delete-process process)
0
+ (rcirc-connect server port nick
0
+ rcirc-default-user-name
0
+ rcirc-default-user-full-name
0
+ channels)))
0
+
0
 (require 'rcirc-color)
0
 (require 'rcirc-completion)
0
\ No newline at end of file
0
...
14
15
16
17
18
19
20
21
 
 
 
 
 
22
23
...
14
15
16
 
 
 
 
 
17
18
19
20
21
22
23
0
@@ -14,10 +14,10 @@ def ri(obj)
0
 end
0
 
0
 # Inspecting really long strings causes inf-ruby to get really, really slow.
0
-class String
0
- def inspect
0
- puts self
0
- end
0
-end
0
+# class String
0
+# def inspect
0
+# puts self
0
+# end
0
+# end
0
 
0
 IRB.conf[:AUTO_INDENT]=true
...
41
42
43
 
44
45
46
...
41
42
43
44
45
46
47
0
@@ -41,6 +41,7 @@
0
 - libpurple-bin
0
 - libquicktime1
0
 - libsqlite3-ruby1.8
0
+- libxml2-dev
0
 - mpc
0
 - mpd
0
 - mpg321

Comments

    No one has commented yet.