Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 59571:04043e03826a
(indent-pp-sexp): Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 15 Jan 2005 18:11:33 +0000 |
| parents | b1bdc11085c9 |
| children | c4bcae7d90b4 cb67264d6096 |
comparison
equal
deleted
inserted
replaced
| 59570:3d6f4d8e0b8b | 59571:04043e03826a |
|---|---|
| 1123 (lisp-indent-line)) | 1123 (lisp-indent-line)) |
| 1124 (indent-sexp endmark) | 1124 (indent-sexp endmark) |
| 1125 (set-marker endmark nil)))) | 1125 (set-marker endmark nil)))) |
| 1126 | 1126 |
| 1127 (defun indent-pp-sexp (&optional arg) | 1127 (defun indent-pp-sexp (&optional arg) |
| 1128 "Indent each line of the list or, with prefix ARG, pretty-printify the list." | 1128 "Indent each line of the list starting just after point, or prettyprint it. |
| 1129 A prefix argument specifies pretty-printing." | |
| 1129 (interactive "P") | 1130 (interactive "P") |
| 1130 (if arg | 1131 (if arg |
| 1131 (save-excursion | 1132 (save-excursion |
| 1132 (save-restriction | 1133 (save-restriction |
| 1133 (narrow-to-region (point) (progn (forward-sexp 1) (point))) | 1134 (narrow-to-region (point) (progn (forward-sexp 1) (point))) |