1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 06:01:22 -08:00

(pp-to-string): Fix previous change.

This commit is contained in:
Richard M. Stallman 1995-02-13 18:05:23 +00:00
parent 2eeeb0d2a0
commit e5cd8a87da

View file

@ -32,8 +32,7 @@ that `read' can handle, whenever this is possible."
(set-buffer (generate-new-buffer " pp-to-string"))
(unwind-protect
(progn
(lisp-mode-variables)
(set-syntax-table emacs-lisp-mode-syntax-table)
(lisp-mode-variables t)
(let ((print-escape-newlines pp-escape-newlines))
(prin1 object (current-buffer)))
(goto-char (point-min))