Mercurial > emacs
comparison lisp/emacs-lisp/autoload.el @ 94293:ca9efc5939fc
Merge from emacs--rel--22
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1121
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 23 Apr 2008 05:55:42 +0000 |
| parents | 07af23654bc8 5b93ac4c9636 |
| children | 90a2847062be |
comparison
equal
deleted
inserted
replaced
| 94292:f07af351ed0b | 94293:ca9efc5939fc |
|---|---|
| 333 \(or OUTBUF if OUTFILE is nil)." | 333 \(or OUTBUF if OUTFILE is nil)." |
| 334 (catch 'done | 334 (catch 'done |
| 335 (let ((autoloads-done '()) | 335 (let ((autoloads-done '()) |
| 336 (load-name (autoload-file-load-name file)) | 336 (load-name (autoload-file-load-name file)) |
| 337 (print-length nil) | 337 (print-length nil) |
| 338 (print-level nil) | |
| 338 (print-readably t) ; This does something in Lucid Emacs. | 339 (print-readably t) ; This does something in Lucid Emacs. |
| 339 (float-output-format nil) | 340 (float-output-format nil) |
| 340 (visited (get-file-buffer file)) | 341 (visited (get-file-buffer file)) |
| 341 (otherbuf nil) | 342 (otherbuf nil) |
| 342 (absfile (expand-file-name file)) | 343 (absfile (expand-file-name file)) |