1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-27 19:31:38 +00:00

(autoload-print-form): Use print-quoted.

This commit is contained in:
Stefan Monnier 2007-08-13 05:35:43 +00:00
parent 1bc99c9c78
commit 9d8563ca18
2 changed files with 6 additions and 0 deletions

View File

@ -1,3 +1,7 @@
2007-08-13 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/autoload.el (autoload-print-form): Use print-quoted.
2007-08-12 Richard Stallman <rms@gnu.org>
* progmodes/sh-script.el (sh): Delete group `unix'.

View File

@ -209,6 +209,7 @@ put the output in."
(setcdr p nil)
(princ "\n(" outbuf)
(let ((print-escape-newlines t)
(print-quoted t)
(print-escape-nonascii t))
(dolist (elt form)
(prin1 elt outbuf)
@ -232,6 +233,7 @@ put the output in."
outbuf))
(terpri outbuf)))
(let ((print-escape-newlines t)
(print-quoted t)
(print-escape-nonascii t))
(print form outbuf)))))))