aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1998-09-13 03:37:24 +0000
committerKarl Heuer1998-09-13 03:37:24 +0000
commite189df50734a6204dc1ec96c7bdde83ba8311990 (patch)
tree0226c2f93615fa10f3da9f7f24afc68c06944293
parent703c3a110b339bda8a24ac69e81cabbaabf451b5 (diff)
downloademacs-e189df50734a6204dc1ec96c7bdde83ba8311990.tar.gz
emacs-e189df50734a6204dc1ec96c7bdde83ba8311990.zip
Doc fixes.
-rw-r--r--lisp/emacs-lisp/pp.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el
index beb79c745ad..926706a7307 100644
--- a/lisp/emacs-lisp/pp.el
+++ b/lisp/emacs-lisp/pp.el
@@ -33,9 +33,9 @@
33 :group 'pp) 33 :group 'pp)
34 34
35(defun pp-to-string (object) 35(defun pp-to-string (object)
36 "Return a string containing the pretty-printed representation of OBJECT, 36 "Return a string containing the pretty-printed representation of OBJECT.
37any Lisp object. Quoting characters are used when needed to make output 37OBJECT can be any Lisp object. Quoting characters are used as needed
38that `read' can handle, whenever this is possible." 38to make output that `read' can handle, whenever this is possible."
39 (save-excursion 39 (save-excursion
40 (set-buffer (generate-new-buffer " pp-to-string")) 40 (set-buffer (generate-new-buffer " pp-to-string"))
41 (unwind-protect 41 (unwind-protect
@@ -76,7 +76,7 @@ that `read' can handle, whenever this is possible."
76;;;###autoload 76;;;###autoload
77(defun pp (object &optional stream) 77(defun pp (object &optional stream)
78 "Output the pretty-printed representation of OBJECT, any Lisp object. 78 "Output the pretty-printed representation of OBJECT, any Lisp object.
79Quoting characters are printed when needed to make output that `read' 79Quoting characters are printed as needed to make output that `read'
80can handle, whenever this is possible. 80can handle, whenever this is possible.
81Output stream is STREAM, or value of `standard-output' (which see)." 81Output stream is STREAM, or value of `standard-output' (which see)."
82 (princ (pp-to-string object) (or stream standard-output))) 82 (princ (pp-to-string object) (or stream standard-output)))
@@ -85,8 +85,8 @@ Output stream is STREAM, or value of `standard-output' (which see)."
85(defun pp-eval-expression (expression) 85(defun pp-eval-expression (expression)
86 "Evaluate EXPRESSION and pretty-print value into a new display buffer. 86 "Evaluate EXPRESSION and pretty-print value into a new display buffer.
87If the pretty-printed value fits on one line, the message line is used 87If the pretty-printed value fits on one line, the message line is used
88instead. Value is also consed on to front of variable values 's 88instead. The value is also consed onto the front of the list
89value." 89in the variable `values'."
90 (interactive "xPp-eval: ") 90 (interactive "xPp-eval: ")
91 (setq values (cons (eval expression) values)) 91 (setq values (cons (eval expression) values))
92 (let* ((old-show-function temp-buffer-show-function) 92 (let* ((old-show-function temp-buffer-show-function)