Mercurial > emacs
changeset 25073:0cac51b5af77
(Fmove_to_column): Extend end of line only if FORCE is t.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Mon, 26 Jul 1999 19:05:40 +0000 |
| parents | 29873c097b15 |
| children | 2eca330f89d7 |
| files | src/indent.c |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/indent.c Mon Jul 26 19:01:27 1999 +0000 +++ b/src/indent.c Mon Jul 26 19:05:40 1999 +0000 @@ -818,9 +818,10 @@ \n\ If specified column is within a character, point goes after that character.\n\ If it's past end of line, point goes to end of line.\n\n\ -A non-nil second (optional) argument FORCE means, if the line\n\ -is too short to reach column COLUMN then add spaces/tabs to get there,\n\ -and if COLUMN is in the middle of a tab character, change it to spaces.\n\ +A non-nil second (optional) argument FORCE means,\n\ +if COLUMN is in the middle of a tab character, change it to spaces.\n\ +In addition, if FORCE is t, and the line is too short\n\ +to reach column COLUMN, add spaces/tabs to get there.\n\ \n\ The return value is the current column.") (column, force) @@ -946,7 +947,7 @@ } /* If line ends prematurely, add space to the end. */ - if (col < goal && !NILP (force)) + if (col < goal && EQ (force, Qt)) Findent_to (make_number (col = goal), Qnil); last_known_column = col;