Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 27484:a681b4de47a1
Add indent specs for dolist, dotimes, when, unless.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Fri, 28 Jan 2000 22:14:30 +0000 (2000-01-28) |
| parents | 6af9b684a1a0 |
| children | 46468edab05e |
comparison
equal
deleted
inserted
replaced
| 27483:b51c38875faf | 27484:a681b4de47a1 |
|---|---|
| 765 (put 'catch 'lisp-indent-function 1) | 765 (put 'catch 'lisp-indent-function 1) |
| 766 (put 'condition-case 'lisp-indent-function 2) | 766 (put 'condition-case 'lisp-indent-function 2) |
| 767 (put 'unwind-protect 'lisp-indent-function 1) | 767 (put 'unwind-protect 'lisp-indent-function 1) |
| 768 (put 'with-output-to-temp-buffer 'lisp-indent-function 1) | 768 (put 'with-output-to-temp-buffer 'lisp-indent-function 1) |
| 769 (put 'eval-after-load 'lisp-indent-function 1) | 769 (put 'eval-after-load 'lisp-indent-function 1) |
| 770 (put 'dolist 'lisp-indent-function 1) | |
| 771 (put 'dotimes 'lisp-indent-function 1) | |
| 772 (put 'when 'lisp-indent-function 1) | |
| 773 (put 'unless 'lisp-indent-function 1) | |
| 770 | 774 |
| 771 (defun indent-sexp (&optional endpos) | 775 (defun indent-sexp (&optional endpos) |
| 772 "Indent each line of the list starting just after point. | 776 "Indent each line of the list starting just after point. |
| 773 If optional arg ENDPOS is given, indent each line, stopping when | 777 If optional arg ENDPOS is given, indent each line, stopping when |
| 774 ENDPOS is encountered." | 778 ENDPOS is encountered." |