|
From: | Deniz Dogan |
Subject: | Re: browse select text, text at point |
Date: | Wed, 06 Jul 2011 15:43:34 +0200 |
User-agent: | Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.2.18) Gecko/20110616 Thunderbird/3.1.11 |
On 2011-07-06 14:19, smclean0640@gmail.com wrote:
Hello, I am wondering whether anyone in the group knows a package that will accomplish the following: - I am on a word, say "limousine", by pressing a keystroke I can browse this word in google (or a chosen search engine) with my default browser, - I have selected a region of text and I want to search that text in my default browser. Any ideas as to how to most effectively accomplish this? Downloading a packaged would be ideal, but I am willing to try my hand at elisp. Stuart
Something like this should google the word at point. (defun google-word-at-point () (interactive) (let ((word (thing-at-point 'word))) (if word (funcall browse-url-browser-function (concat "http://google.com/" word)) (error "No word at point!"))))You can either call this using M-x google-word-at-point RET or bind it to a suitable key:
(global-set-key (kbd "C-c g") 'google-word-at-point)You could extend the function `google-word-at-point' further to check if `use-region-p' returns non-nil and if so use the region as the "word".
Hope that helps, Deniz
[Prev in Thread] | Current Thread | [Next in Thread] |