Search Results
6/13/2025, 6:54:57 PM
>>105581689
tried adding the same jump to definition from the webm
(defun lainfind ()
(interactive)
(let ((symbol (thing-at-point 'symbol))
(file (thing-at-point 'filename)))
(cond ((file-exists-p file)
(find-file file))
(symbol
(find-function (intern symbol))))))
(define-key lisp-interaction-mode-map (kbd "<mouse-1>") #'lainfind)
tried adding the same jump to definition from the webm
(defun lainfind ()
(interactive)
(let ((symbol (thing-at-point 'symbol))
(file (thing-at-point 'filename)))
(cond ((file-exists-p file)
(find-file file))
(symbol
(find-function (intern symbol))))))
(define-key lisp-interaction-mode-map (kbd "<mouse-1>") #'lainfind)
Page 1