Mercurial > emacs
changeset 80490:5b93ac4c9636
(autoload-generate-file-autoloads):
Bind print-level to ensure output forms aren't truncated if
print-level is set to eval-expression-print-level when going via
eval-defun and friends, or has been otherwise fiddled with.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 11 Apr 2008 01:59:14 +0000 |
| parents | fc6d47996893 |
| children | 6f4e6d274e4f |
| files | lisp/ChangeLog lisp/emacs-lisp/autoload.el |
| diffstat | 2 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Apr 10 20:47:59 2008 +0000 +++ b/lisp/ChangeLog Fri Apr 11 01:59:14 2008 +0000 @@ -1,7 +1,14 @@ +2008-04-11 Kevin Ryde <user42@zip.com.au> + + * emacs-lisp/autoload.el (autoload-generate-file-autoloads): + Bind print-level to ensure output forms aren't truncated if + print-level is set to eval-expression-print-level when going via + eval-defun and friends, or has been otherwise fiddled with. + 2008-04-09 Michael Albinus <michael.albinus@gmx.de> - * net/tramp.el (tramp-find-file-name-coding-system-alist): New - defun. + * net/tramp.el (tramp-find-file-name-coding-system-alist): + New defun. (tramp-handle-insert-file-contents, tramp-handle-write-region): Use it.
--- a/lisp/emacs-lisp/autoload.el Thu Apr 10 20:47:59 2008 +0000 +++ b/lisp/emacs-lisp/autoload.el Fri Apr 11 01:59:14 2008 +0000 @@ -301,6 +301,7 @@ (substring name 0 (match-beginning 0)) name))) (print-length nil) + (print-level nil) (print-readably t) ; This does something in Lucid Emacs. (float-output-format nil) (done-any nil)