# HG changeset patch
# User Thien-Thi Nguyen <ttn@gnuvola.org>
# Date 1150098658 0
# Node ID e2c7eb3cbb0c6828ab53a450d12389056e60376e
# Parent  59c8b05c2ce4313c0b7975e8f28fe9e00c71cebe
(hack-local-variables-confirm):
Display string value using its printed representation.

diff -r 59c8b05c2ce4 -r e2c7eb3cbb0c lisp/files.el
--- a/lisp/files.el	Sun Jun 11 18:59:31 2006 +0000
+++ b/lisp/files.el	Mon Jun 12 07:50:58 2006 +0000
@@ -2406,7 +2406,11 @@
 		   (insert "    ")))
 	    (princ (car elt) buf)
 	    (insert " : ")
-	    (princ (cdr elt) buf)
+            (if (stringp (cdr elt))
+                ;; Make strings with embedded whitespace easier to read.
+                (let ((print-escape-newlines t))
+                  (prin1 (cdr elt) buf))
+              (princ (cdr elt) buf))
 	    (insert "\n"))
 	  (setq prompt
 		(format "Please type %s%s: "