I recommend that you use my new version of this function that either googles a region (if any selected) or a query.
(defun google () "Googles a query or region if any." (interactive) (browse-url (concat "http://www.google.com/search?ie=utf-8&oe=utf-8&q=" (if mark-active (buffer-substring (region-beginning) (region-end)) (read-string "Query: ")))))
Two of my most frequently used tools when programming are Emacs and Firefox. And much of the time in Firefox I spend on Google. That’s why I created this (simple) function that googles a region. Just select the region you want to google and then do M-x google-region (or preferably bind a key to it).
(defun google-region (beg end) "Google the selected region." (interactive "r") (browse-url (concat "http://www.google.com/search?ie=utf-8&oe=utf-8&q=" (buffer-substring beg end))))
You must also set your browser:
(setq browse-url-browser-function 'browse-url-generic browse-url-generic-program "/usr/bin/firefox")
To bind a key to the function (replace … with you prefered key):
(global-set-key (kbd "...") 'google-region)