diff lisp/emacs-lisp/autoload.el @ 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 b98604865ea0
children 107ccd98fa12 424b655804ca
line wrap: on
line diff
--- 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)))))))