changeset 82358:386452a14fe0

(autoload-print-form): Use print-quoted.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 13 Aug 2007 05:35:43 +0000
parents 70180028ad92
children 25c5bc8d8b8e
files lisp/ChangeLog lisp/emacs-lisp/autoload.el
diffstat 2 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Aug 13 04:06:31 2007 +0000
+++ b/lisp/ChangeLog	Mon Aug 13 05:35:43 2007 +0000
@@ -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'.
--- a/lisp/emacs-lisp/autoload.el	Mon Aug 13 04:06:31 2007 +0000
+++ b/lisp/emacs-lisp/autoload.el	Mon Aug 13 05:35:43 2007 +0000
@@ -209,6 +209,7 @@
 	    (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 @@
 		       outbuf))
 	      (terpri outbuf)))
 	(let ((print-escape-newlines t)
+              (print-quoted t)
 	      (print-escape-nonascii t))
 	  (print form outbuf)))))))