2015-11-24 16:44:17 +08:00
|
|
|
;;; defuns-lisp.el
|
2015-06-15 15:06:10 +08:00
|
|
|
|
|
|
|
|
;;;###autoload
|
|
|
|
|
(defun narf/elisp-find-function-at-pt ()
|
|
|
|
|
(interactive)
|
|
|
|
|
(let ((func (function-called-at-point)))
|
|
|
|
|
(if func (find-function func))))
|
|
|
|
|
|
|
|
|
|
;;;###autoload
|
|
|
|
|
(defun narf/elisp-find-function-at-pt-other-window ()
|
|
|
|
|
(interactive)
|
|
|
|
|
(let ((func (function-called-at-point)))
|
|
|
|
|
(if func (find-function-other-window func))))
|
|
|
|
|
|
2015-11-24 16:44:17 +08:00
|
|
|
(provide 'defuns-lisp)
|
|
|
|
|
;;; defuns-lisp.el ends here
|
