mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00
Code Issues Releases Activity

(hack-local-variables-confirm):

Browse Source 
Display string value using its printed representation.
This commit is contained in:
Thien-Thi Nguyen 2006-06-12 07:52:05 +00:00
parent 6b519504c3
commit 15a8ea0ca6
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2006-06-12 Thien-Thi Nguyen <ttn@gnu.org>
* files.el (hack-local-variables-confirm):
Display string value using its printed representation.
2006-06-11 Chong Yidong <cyd@stupidchicken.com>
* server.el (server-edit): No-op if no server buffers exist.

6
lisp/files.el
View File

@ -2406,7 +2406,11 @@ n -- to ignore the local variables list.")
(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: "