From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 27 Jan 1997 02:40:13 +0000 (+0000)
Subject: (byte-compile-inline-expand): Recalculate fn
X-Git-Tag: emacs-20.1~3003
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7aec540f0c8899925a11cdf9876d93ed7bd7fc7f;p=emacs.git

(byte-compile-inline-expand): Recalculate fn
after loading a file to define the function.
---

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index ef2880c7d9b..4b7b9f305e6 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -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)