From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Richard Riley Newsgroups: gmane.emacs.help Subject: Re: elisp-index-search on current word Date: Thu, 09 Oct 2008 15:54:24 +0200 Organization: A noiseless patient Spider Message-ID: References: <36eff0bb-4e77-474a-97f2-820fdc077900@t18g2000prt.googlegroups.com> <87prmbdv6h.fsf@manatee.domain> <765c9d83-3749-4a7b-873b-e9e305efbe40@i24g2000prf.googlegroups.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-Trace: ger.gmane.org 1223563266 10454 80.91.229.12 (9 Oct 2008 14:41:06 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 9 Oct 2008 14:41:06 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Oct 09 16:42:02 2008 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1Knwhv-0005m2-No for geh-help-gnu-emacs@m.gmane.org; Thu, 09 Oct 2008 16:41:40 +0200 Original-Received: from localhost ([127.0.0.1]:41016 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Knwgr-0000Jo-Rp for geh-help-gnu-emacs@m.gmane.org; Thu, 09 Oct 2008 10:40:33 -0400 Original-Path: news.stanford.edu!headwall.stanford.edu!newshub.sdsu.edu!news.motzarella.org!motzarella.org!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 56 Original-X-Trace: feeder.motzarella.org U2FsdGVkX1/yDwiiIZJ7OtTz/OTMIhM/VF0WnXkoUayRLJ+P9s1ywNzBnLBhIdJ5cKgvCBW7eCbx6B1h7AV5b2hVd8gX/Tvb3rcHXe6IG6dnmOZFN4SByiaI0kIbJoFzTYEcQj672r1o4rgaepyn6Q== Original-X-Complaints-To: Please send complaints to abuse@motzarella.org with full headers Original-NNTP-Posting-Date: Thu, 9 Oct 2008 13:54:07 +0000 (UTC) X-Auth-Sender: U2FsdGVkX19ZRSH6q4JvK/5phhHKXkf94N9VQxW2ez+q7o1n79kMjA== Cancel-Lock: sha1:GXNJtQd6EgteUKA7X3oVHwh53OI= User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) Original-Xref: news.stanford.edu gnu.emacs.help:163274 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:58617 Archived-At: Thierry Volpiatto writes: > Xah writes: > >> On Oct 8, 7:21 am, Andy Stewart wrote: >>> Kevin Rodgers writes: >>> >Xahwrote: >>> >> when i do elisp-index-search, is there a way to make the default >>> >> choice the symbol the cursor is on? >>> >>> > (defadvice elisp-index-search (before interactive-default activate) >>> >   "Provide the symbol at point as the default when reading TOPIC interactively." >>> >   (interactive (list (read-string "Topic: " nil nil (thing-at-point 'symbol))))) >>> >>> (defun elisp-index-search+ () >>>   "Look up TOPIC in the indices of the Emacs Lisp Reference Manual." >>>   (interactive) >>>   (let (topic) >>>     (setq topic (read-string (concat "Subject to look up: ") nil nil (symbol-name (symbol-at-point)))) >>>     (funcall 'switch-to-buffer-other-window nil) >>>     (info "elisp") >>>     (Info-index topic))) >> >> Thierry wrote: >> ,---- >> | (defun tv-get-index-at-point () >> | (interactive) >> | (let ((expr (thing-at-point 'sexp))) >> | (elisp-index-search expr))) >> `---- >> >> among the 3 suggestions, it seems only Thierry's version works for me. >> >> is there a reason why it shouldn't prompt for current symbol? > No you can have a prompt, (use to display thing-at-point) > > ,---- > | (defun tv-get-index-at-point (expr) > | (interactive > | (list (read-from-minibuffer "Search: " > | nil > | nil > | nil > | nil > | (thing-at-point 'sexp)))) > | (elisp-index-search expr)) > `---- Would it be possible to have the thing at point displayed like most defaults when you call the function? e.g If you hit search in most editors one would normally see the word at point or region preselected in the "search" field. -- I think I should not go far wrong if I asserted that the amount of genuine leisure available in a society is generally in inverse proportion to the amount of labor-saving machinery it employs. ~E.F. Schumacher