Re: elisp-index-search on current word

[Xah]

On Oct 8, 7:49 pm, Kevin Rodgers <kevin.d.rodg...@gmail.com> wrote:
> Xah wrote:
> > On Oct 8, 7:21 am, Andy Stewart <lazycat.mana...@gmail.com> wrote:
> >> Kevin Rodgers <kevin.d.rodg...@gmail.com> 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.
>
> What happens when you call my version or Andy's version?

it didn't prompt the symbol under cursor. I tried up arrow but i
didn't try down arrow; should've.

I filed a bug report on this issue. I think it should prompt the
symbol under cursor like most other lookup commands such as describe-
function, where the current symbol is shown inside the prompt text.

  Xah
∑ http://xahlee.org/

☄