[define stupid lyric lookup hack
clinton@unknownlamer.org**20070525212000] {
hunk ./init.d/misc.el 25
-(global-set-key [?\M-\\ ] #'(lambda () (interactive) (insert "lambda")))
+(define-key lisp-mode-shared-map [?\M-\\ ] #'(lambda () (interactive) (insert "lambda")))
hunk ./init.d/misc.el 41
-;; C-x <left>/<right> were moved to C-c <left>/<right>. I like them
-;; where they began; the new functions for buffer movement are also
-;; bound to C-x C-<left>/<right> so things can coexist nicely
-(global-set-key [?\C-x left] #'winner-undo)
-(global-set-key [?\C-x right] #'winner-redo)
-
-(global-set-key [?\C-c left] #'next-buffer)
-(global-set-key [?\C-c right] #'previous-buffer)
-
hunk ./init.d/misc.el 53
+(defun cke-lyrics (band)
+  (interactive "sBand: ")
+  (let ((band (apply #'concat
+		     (split-string (downcase band) " "))))
+    (w3m-goto-url-new-session (format "http://darklyrics.com/%s/%s.html"
+				      (substring band 0 1)
+				      band))))
+
}