Function: gnus-bind-print-variables

gnus-bind-print-variables is a macro defined in gnus-util.el.gz.

Signature

(gnus-bind-print-variables &rest FORMS)

Documentation

Bind print-* variables and evaluate FORMS.

This macro is used with prin1, pp, etc. in order to ensure printed Lisp objects are loadable. Bind print-quoted to t, and print-escape-multibyte, print-escape-newlines, print-escape-nonascii, print-length, print-level and print-string-length to nil.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-util.el.gz
(defmacro gnus-bind-print-variables (&rest forms)
  "Bind print-* variables and evaluate FORMS.
This macro is used with `prin1', `pp', etc. in order to ensure
printed Lisp objects are loadable.  Bind `print-quoted' to t, and
`print-escape-multibyte', `print-escape-newlines',
`print-escape-nonascii', `print-length', `print-level' and
`print-string-length' to nil."
  `(let ((print-quoted t)
	 ;;print-circle
	 ;;print-continuous-numbering
	 print-escape-multibyte
	 print-escape-newlines
	 print-escape-nonascii
	 ;;print-gensym
	 print-length
	 print-level
	 print-string-length)
     ,@forms))