# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 933015940 0
# Node ID 0cac51b5af77cc9e51a81b894bf1314272ab04d4
# Parent  29873c097b15b80c3ef568c35e271b2127632f7e
(Fmove_to_column): Extend end of line only if FORCE is t.

diff -r 29873c097b15 -r 0cac51b5af77 src/indent.c
--- 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;