Skip to content

Instantly share code, notes, and snippets.

@abuiles
Created December 2, 2009 21:31
Show Gist options
  • Save abuiles/247617 to your computer and use it in GitHub Desktop.
Save abuiles/247617 to your computer and use it in GitHub Desktop.
(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))))
(defun translate-region (beg end)
"Show the translation of the selected word."
(interactive "r")
(browse-url (concat "http://www.wordreference.com/es/translation.asp?tranword=" (buffer-substring beg end))))
(defun rae-region (beg end)
"Show the translation of the selected word."
(interactive "r")
(browse-url (concat "http://buscon.rae.es/draeI/SrvltConsulta?TIPO_BUS=3&LEMA=" (buffer-substring beg end))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment