Bind find-function in emacs-lisp