* lisp/cus-edit.el (custom-save-all): Bind print-length and print-level to nil.

Fixes: debbugs:7581

2 files changed, 8 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1805c06878e..ba9ae095240 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-12-08  Tom Breton  <tehom@panix.com>
+
+        * cus-edit.el (custom-save-all):
+        Bind print-length and print-level to nil.  (Bug#7581)
+
 2010-12-08  Glenn Morris  <rgm@gnu.org>
 
         * mouse.el (mouse-menu-major-mode-map, mouse-menu-bar-map):
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index b815e31f31c..4046009a9a0 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4279,7 +4279,9 @@ if only the first line of the docstring is shown."))
 
       (unless (eq major-mode 'emacs-lisp-mode)
         (emacs-lisp-mode))
-      (let ((inhibit-read-only t))
+      (let ((inhibit-read-only t)
+            (print-length nil)
+            (print-level nil))
         (custom-save-variables)
         (custom-save-faces))
       (let ((file-precious-flag t))