From fd2c4cd833ed262d6a43ab8cf004154aa2533143 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 27 Oct 2003 15:22:38 +0000 Subject: [PATCH] (reindent-then-newline-and-indent): Delete space *after* reindenting the first line. --- lisp/ChangeLog | 23 +++++++++++++++++++++-- lisp/simple.el | 4 ++-- 2 files changed, 23 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 928091f64bd..557e49eed2c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,10 +1,29 @@ +2003-10-27 Stefan Monnier + + * simple.el (reindent-then-newline-and-indent): Delete space *after* + reindenting the first line. + 2003-10-25 Per Abrahamsen * wid-edit.el (widget-default-delete): Always delete child widgets. +2003-10-24 Stefan Monnier + + * newcomment.el (comment-indent): Don't call indent-according-to-mode + if the line has code. + Don't try to line up with something that's too far left. + + * progmodes/octave-mod.el (octave-comment-start): Simplify. + (octave-mode-syntax-table): Add % as a comment starter. + (octave-point): Remove. + (octave-in-comment-p, octave-in-string-p) + (octave-not-in-string-or-comment-p, calculate-octave-indent) + (octave-blink-matching-block-open, octave-auto-fill): + Use line-(beginning|end)-position instead. + 2003-10-23 Francesco Potort,Al(B - * emacs-lisp/authors.el (authors-aliases): Added correct realname + * emacs-lisp/authors.el (authors-aliases): Add correct realname for Francesco Potort,Al(B. 2003-10-23 Dave Love @@ -20,7 +39,7 @@ * gdb-ui.el (gdb-current-language): New variable. (gdb-update-flag): Remove variable. - (gud-watch,gdb-frame-handler): Adapt for other languages (Fortran). + (gud-watch, gdb-frame-handler): Adapt for other languages (Fortran). (gdb-take-last-elt): Remove function. (gdb-dequeue-input): Avoid recursion by not using gdb-take-last-elt. (gdb-post-prompt): Check for variable object changes here. diff --git a/lisp/simple.el b/lisp/simple.el index b0d5f7295f9..3d636de721a 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -303,14 +303,14 @@ In programming language modes, this is the same as TAB. In some text modes, where TAB inserts a tab, this indents to the column specified by the function `current-left-margin'." (interactive "*") - (delete-horizontal-space t) (let ((pos (point))) ;; Be careful to insert the newline before indenting the line. ;; Otherwise, the indentation might be wrong. (newline) (save-excursion (goto-char pos) - (indent-according-to-mode)) + (indent-according-to-mode) + (delete-horizontal-space t)) (indent-according-to-mode))) (defun quoted-insert (arg) -- 2.11.4.GIT