2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e210a1697bc..93201ac101c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-07-31  Chong Yidong  <cyd@stupidchicken.com>
+
+        * simple.el (line-move-finish): Pass whole number to
+        line-move-to-column.
+
 2009-07-30  Jay Belanger  <jay.p.belanger@gmail.com>
 
         * calc/calc-mode.el (calc-matrix-brackets): Remove "P" from prompt.
diff --git a/lisp/simple.el b/lisp/simple.el
index e9deafbfb6e..3c779269f4d 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4285,7 +4285,7 @@ into account variable-width characters and line continuation."
                (point))))
 
         ;; Move to the desired column.
-        (line-move-to-column column)
+        (line-move-to-column (truncate column))
 
         ;; Corner case: suppose we start out in a field boundary in
         ;; the middle of a continued line.  When we get to