(defun help-fns--autoloaded-p (function file) "Return non-nil if FUNCTION has previously been autoloaded. FILE is the file where FUNCTION was probably defined." (let* ((file (file-name-sans-extension (file-truename file))) (load-hist load-history) (target (cons t function)) found) (while (and load-hist (not found)) (and (caar load-hist) (equal (file-name-sans-extension (caar load-hist)) file) (setq found (member target (cdar load-hist)))) (setq load-hist (cdr load-hist))) found))