diff options
| author | Karl Heuer | 1998-09-13 03:37:24 +0000 |
|---|---|---|
| committer | Karl Heuer | 1998-09-13 03:37:24 +0000 |
| commit | e189df50734a6204dc1ec96c7bdde83ba8311990 (patch) | |
| tree | 0226c2f93615fa10f3da9f7f24afc68c06944293 | |
| parent | 703c3a110b339bda8a24ac69e81cabbaabf451b5 (diff) | |
| download | emacs-e189df50734a6204dc1ec96c7bdde83ba8311990.tar.gz emacs-e189df50734a6204dc1ec96c7bdde83ba8311990.zip | |
Doc fixes.
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 12 |
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. |
| 37 | any Lisp object. Quoting characters are used when needed to make output | 37 | OBJECT can be any Lisp object. Quoting characters are used as needed |
| 38 | that `read' can handle, whenever this is possible." | 38 | to 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. |
| 79 | Quoting characters are printed when needed to make output that `read' | 79 | Quoting characters are printed as needed to make output that `read' |
| 80 | can handle, whenever this is possible. | 80 | can handle, whenever this is possible. |
| 81 | Output stream is STREAM, or value of `standard-output' (which see)." | 81 | Output 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. |
| 87 | If the pretty-printed value fits on one line, the message line is used | 87 | If the pretty-printed value fits on one line, the message line is used |
| 88 | instead. Value is also consed on to front of variable values 's | 88 | instead. The value is also consed onto the front of the list |
| 89 | value." | 89 | in 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) |