diff options
| author | Stefan Monnier | 2001-05-27 11:34:56 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2001-05-27 11:34:56 +0000 |
| commit | 0abfa90d846e6545b7ea72d5eb9282ebd9bd45d1 (patch) | |
| tree | cb98723c64050c297a018287f0e7711ca60ddb13 | |
| parent | 28881a56aa065339b4e875574eae80e21895d009 (diff) | |
| download | emacs-0abfa90d846e6545b7ea72d5eb9282ebd9bd45d1.tar.gz emacs-0abfa90d846e6545b7ea72d5eb9282ebd9bd45d1.zip | |
(byte-compile-inline-expand): Complete Dave's
patch to correct the error message as well.
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 95c9e714372..86ccb7fc51c 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el | |||
| @@ -269,7 +269,7 @@ | |||
| 269 | (setq fn (or (and (fboundp name) (symbol-function name)) | 269 | (setq fn (or (and (fboundp name) (symbol-function name)) |
| 270 | (cdr (assq name byte-compile-function-environment))))) | 270 | (cdr (assq name byte-compile-function-environment))))) |
| 271 | (if (and (consp fn) (eq (car fn) 'autoload)) | 271 | (if (and (consp fn) (eq (car fn) 'autoload)) |
| 272 | (error "File `%s' didn't define `%s'" (nth 2 fn) name)) | 272 | (error "File `%s' didn't define `%s'" (nth 1 fn) name)) |
| 273 | (if (symbolp fn) | 273 | (if (symbolp fn) |
| 274 | (byte-compile-inline-expand (cons fn (cdr form))) | 274 | (byte-compile-inline-expand (cons fn (cdr form))) |
| 275 | (if (byte-code-function-p fn) | 275 | (if (byte-code-function-p fn) |