Function: smart-prog-to-definition
smart-prog-to-definition is an autoloaded, interactive and
byte-compiled function defined in hmouse-tag.el.
Signature
(smart-prog-to-definition &optional TAG)
Documentation
If a def for optional programming TAG can be found, jump to the def.
If TAG is nil, use any tag around point instead.
Key Bindings
Source Code
;; Defined in ~/.emacs.d/elpa/hyperbole-20261030.2317/hmouse-tag.el
;;;###autoload
(defun smart-prog-to-definition (&optional tag)
"If a def for optional programming TAG can be found, jump to the def.
If TAG is nil, use any tag around point instead."
(interactive)
(if tag
(progn (cond ((stringp tag))
((symbolp tag) (setq tag (symbol-name tag)))
(t (error "")))
(or (and tag (smart-lisp-at-known-identifier-p))
(and tag (smart-tags-find-p tag))
;; Flash if tag matches any tag at point
(when (and tag (equal tag (smart-prog-at-tag-p t)))
(setq tag (smart-flash-tag-at-point tag)))))
(setq tag (smart-prog-at-tag-p t))
(unless (and tag (smart-tags-find-p tag)
(setq tag (smart-flash-tag-at-point tag)))
(setq tag nil)))
(when tag
(ignore-errors (smart-prog-tag tag))))