changeset 16941:5a800a9d903b

(byte-compile-inline-expand): Recalculate fn after loading a file to define the function.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Jan 1997 02:40:13 +0000
parents 6d680b18a47b
children eca5dfcd481d
files lisp/emacs-lisp/byte-opt.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el	Mon Jan 27 02:40:00 1997 +0000
+++ b/lisp/emacs-lisp/byte-opt.el	Mon Jan 27 02:40:13 1997 +0000
@@ -270,7 +270,10 @@
 	  form)
       ;; else
       (if (and (consp fn) (eq (car fn) 'autoload))
-	  (load (nth 1 fn)))
+	  (progn
+	    (load (nth 1 fn))
+	    (setq fn (or (cdr (assq name byte-compile-function-environment))
+			 (and (fboundp name) (symbol-function name))))))
       (if (and (consp fn) (eq (car fn) 'autoload))
 	  (error "file \"%s\" didn't define \"%s\"" (nth 1 fn) name))
       (if (symbolp fn)