procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/pp.el: Doc fixes.

Browse source
This commit is contained in:
Stefan Kangas 2021-04-29 13:44:54 +02:00
parent 6486c9dc73
commit 1984213f62
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/pp.el
View file

@ -140,7 +140,7 @@ Also add the value to the front of the list in the variable `values'."
(pp-display-expression (macroexpand-1 expression) "*Pp Macroexpand Output*")) (pp-display-expression (macroexpand-1 expression) "*Pp Macroexpand Output*"))
(defun pp-last-sexp () (defun pp-last-sexp ()
"Read sexp before point. Ignores leading comment characters." "Read sexp before point. Ignore leading comment characters."
(with-syntax-table emacs-lisp-mode-syntax-table (with-syntax-table emacs-lisp-mode-syntax-table
(let ((pt (point))) (let ((pt (point)))
(save-excursion (save-excursion
@ -160,7 +160,7 @@ Also add the value to the front of the list in the variable `values'."
;;;###autoload ;;;###autoload
(defun pp-eval-last-sexp (arg) (defun pp-eval-last-sexp (arg)
"Run `pp-eval-expression' on sexp before point. "Run `pp-eval-expression' on sexp before point.
With argument, pretty-print output into current buffer. With ARG, pretty-print output into current buffer.
Ignores leading comment characters." Ignores leading comment characters."
(interactive "P") (interactive "P")
(if arg (if arg
@ -170,7 +170,7 @@ Ignores leading comment characters."
;;;###autoload ;;;###autoload
(defun pp-macroexpand-last-sexp (arg) (defun pp-macroexpand-last-sexp (arg)
"Run `pp-macroexpand-expression' on sexp before point. "Run `pp-macroexpand-expression' on sexp before point.
With argument, pretty-print output into current buffer. With ARG, pretty-print output into current buffer.
Ignores leading comment characters." Ignores leading comment characters."
(interactive "P") (interactive "P")
(if arg (if arg