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))))