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 | 484cd5b16c02ec5c277092ee8d3e165aeca41fad (patch) | |
| tree | ad6d3f423ecd585bcc5851ed509128d582944c41 /lisp/emacs-lisp | |
| parent | 21ef90eecf200cdb75d4d4ab9e8502db10b825ca (diff) | |
| download | emacs-484cd5b16c02ec5c277092ee8d3e165aeca41fad.tar.gz emacs-484cd5b16c02ec5c277092ee8d3e165aeca41fad.tar.bz2 emacs-484cd5b16c02ec5c277092ee8d3e165aeca41fad.zip | |
(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) |