bug#7581: custom-save-* can print wrong.

["Tom Breton (Tehom)" <tehom@panix.com>]

[-- Attachment #1: Type: text/plain, Size: 224 bytes --]

`customize-save-variable' resulted in an .emacs.custom file containing
many `...' symbols.  I deem that serious.

I believe this was due to `print-level' being non-nil, and I have attached
a patch that seems to fix this.

[-- Attachment #2: custom-save-diff --]
[-- Type: application/octet-stream, Size: 944 bytes --]

diff -c -b -L /su:localhost:/usr/share/emacs/22.2/lisp/old-cus-edit.el -L /su:localhost:/usr/share/emacs/22.2/lisp/cus-edit.el /tmp/tramp.2738gnN.el /tmp/tramp.2738txT.el
*** /su:localhost:/usr/share/emacs/22.2/lisp/old-cus-edit.el
--- /su:localhost:/usr/share/emacs/22.2/lisp/cus-edit.el
***************
*** 4212,4218 ****
  			   (or old-buffer (find-file-noselect filename)))
        (unless (eq major-mode 'emacs-lisp-mode)
  	(emacs-lisp-mode))
!       (let ((inhibit-read-only t))
  	(custom-save-variables)
  	(custom-save-faces))
        (let ((file-precious-flag t))
--- 4212,4220 ----
  			   (or old-buffer (find-file-noselect filename)))
        (unless (eq major-mode 'emacs-lisp-mode)
  	(emacs-lisp-mode))
!       (let ((inhibit-read-only t)
! 	      (print-length nil)
! 	      (print-level nil))
  	(custom-save-variables)
  	(custom-save-faces))
        (let ((file-precious-flag t))

Diff finished.  Tue Dec  7 11:39:28 2010