Mercurial > hg > octave-nkf
changeset 2238:b750da9b0f80
[project @ 1996-05-20 21:11:09 by jwe]
author | jwe |
---|---|
date | Mon, 20 May 1996 21:11:09 +0000 |
parents | 1351500ed277 |
children | 4d12b52750cb |
files | emacs/octave.el |
diffstat | 1 files changed, 2 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/emacs/octave.el +++ b/emacs/octave.el @@ -729,18 +729,11 @@ (octave-blink-matching-function))))) (defun octave-indent-new-line () - "Reindent the current Octave line, insert a newline and indent the newline. + "Reindent the current Octave line, insert a newline and indent the new line. An abbrev before point is expanded if `abbrev-mode' is non-nil." (interactive) (if abbrev-mode (expand-abbrev)) - (save-excursion - (beginning-of-line) - (skip-chars-forward " \t") - (if (or (looking-at "end") ;Reindent only where it is most - (looking-at "else") ;likely to be necessary - (looking-at octave-continuation-regexp)) - (octave-indent-line))) - (end-of-line) + (octave-indent-line) (newline) (octave-indent-line))