[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-24 r117023: * lisp/desktop.el (desktop-value-to-stri
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] emacs-24 r117023: * lisp/desktop.el (desktop-value-to-string): Let-bind `print-length' and `print-level' to nil. |
Date: |
Sun, 27 Apr 2014 08:22:17 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 117023
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/17351
committer: Juri Linkov <address@hidden>
branch nick: emacs-24
timestamp: Sun 2014-04-27 11:22:11 +0300
message:
* lisp/desktop.el (desktop-value-to-string): Let-bind `print-length' and
`print-level' to nil.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/desktop.el desktop.el-20091113204419-o5vbwnq5f7feedwu-591
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2014-04-25 18:01:18 +0000
+++ b/lisp/ChangeLog 2014-04-27 08:22:11 +0000
@@ -1,3 +1,8 @@
+2014-04-27 Juri Linkov <address@hidden>
+
+ * desktop.el (desktop-value-to-string): Let-bind `print-length'
+ and `print-level' to nil. (Bug#17351)
+
2014-04-25 Nicolas Richard <address@hidden>
* battery.el (battery-update): Handle the case where battery
=== modified file 'lisp/desktop.el'
--- a/lisp/desktop.el 2014-03-12 07:14:30 +0000
+++ b/lisp/desktop.el 2014-04-27 08:22:11 +0000
@@ -844,12 +844,13 @@
"Convert VALUE to a string that when read evaluates to the same value.
Not all types of values are supported."
(let* ((print-escape-newlines t)
+ (print-length nil)
+ (print-level nil)
(float-output-format nil)
(quote.sexp (desktop--v2s value))
(quote (car quote.sexp))
- (txt
- (let ((print-quoted t))
- (prin1-to-string (cdr quote.sexp)))))
+ (print-quoted t)
+ (txt (prin1-to-string (cdr quote.sexp))))
(if (eq quote 'must)
(concat "'" txt)
txt)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-24 r117023: * lisp/desktop.el (desktop-value-to-string): Let-bind `print-length' and `print-level' to nil.,
Juri Linkov <=