bind find-function-at-point in elisp