From: David Reitter <david.reitter@gmail.com>
Date: Sun, 12 Sep 2010 17:46:57 +0000 (-0400)
Subject: simple.el (line-move-visual): Do not truncate goal column to integer size.
X-Git-Tag: emacs-pretest-23.2.90~120
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5a66ed0f659b03419e0aab65a7841211f82af545;p=emacs.git

simple.el (line-move-visual): Do not truncate goal column to integer size.
(Bug#7020)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce8d515a107..8ac5a4a4351 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-09-12  David Reitter  <david.reitter@gmail.com>
+
+	* simple.el (line-move-visual): Do not truncate goal column to
+	integer size.  (Bug#7020)
+
 2010-09-11  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* repeat.el (repeat): Allow repeating when the last event is a click.
diff --git a/lisp/simple.el b/lisp/simple.el
index d5065b73ff9..28b60cc1cf5 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4193,7 +4193,7 @@ into account variable-width characters and line continuation."
     (or (and (= (vertical-motion
 		 (cons (or goal-column
 			   (if (consp temporary-goal-column)
-			       (truncate (car temporary-goal-column))
+			       (car temporary-goal-column)
 			     temporary-goal-column))
 		       arg))
 		arg)