google.el

EmacsからGoogleを開くやつ

https://gist.github.com/960124

(defun google (begin end &optional arg)
  (interactive "r\nP")
  (let (
        (str (buffer-substring-no-properties begin end))
        )
    (browse-url (concat "http://www.google.co.jp/search?q=" str))))