[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Go to Emacs-Lisp Definition
From: |
Andreas Röhler |
Subject: |
Re: Go to Emacs-Lisp Definition |
Date: |
Tue, 22 Sep 2009 13:59:00 +0200 |
User-agent: |
Thunderbird 2.0.0.19 (X11/20081227) |
Nordlöw wrote:
> Has anyone implemented a go to (lookup) definition of an Emacs-Lisp
> symbol: function, variable, face, etc kind of like find-tag but using
> Emacs own symbol database (hash-table)?
>
> I know that I can achieve this in Vanilla Emacs with C-h f,v, but
> direct jump (M-.) would be more user efficient!
>
> Thanks,
> Per Nordlöw
>
>
with output following C-h v or C-h f
I use `jump-to-form' - bound here to f12:
(defun jump-to-form ()
(interactive)
(if (featurep 'xemacs)
(progn
(forward-char 1)
(let ((name (symbol-atpt))
(file (progn (search-forward "\"" nil t 1)(thing-at-point
'filename))))
(forward-char 1)
(help-find-source-or-scroll-up (point))
(switch-to-buffer (current-buffer))
(kill-new name)
(search-forward name)))
(other-window 1)
(forward-button 1)
;; (find-file (filename-atpt))
(push-button)))
;;;;;;;;;