diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-07-30 19:03:26 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-07-30 19:03:26 +0000 |
| commit | 237c997ecc0d66e11b295c2bcc36697c823cb9e0 (patch) | |
| tree | cfdb896113b1e27ccfe5552846c310a33519f0f4 /lisp/emacs-lisp | |
| parent | 6b63e8a903a33515d9a0dd3903c645e7d0f66a6b (diff) | |
| download | emacs-237c997ecc0d66e11b295c2bcc36697c823cb9e0.tar.gz | |
(byte-compile-insert-header): If compiling for vers 18,
arrange to set current-load-list when loadingthe file.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index fccba021a8e..dd832fae11e 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1410,8 +1410,10 @@ With argument, insert value in current buffer after the form." 1 -1) (if byte-compile-dynamic-docstrings "' was compiled for Emacs 19.29 or later\"))\n\n" - "' was compiled for Emacs 19\"))\n\n") - ))) + "' was compiled for Emacs 19\"))\n\n")) + (insert "(or (boundp 'current-load-list) (setq current-load-list nil))\n" + "\n") + )) (defun byte-compile-output-file-form (form) |