(move_it_by_lines) <DVPOS < 0>: If not already on

a line start, move back to the line start.

diff --git a/src/ChangeLog b/src/ChangeLog
index 89a26e3a4632ca8860ad327f8e8ef4f8c6aa44cc..4aea39cc3b6322e427c5d53dd2e75648b801ac1d 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2001-08-13  Gerd Moellmann  <gerd@gnu.org>
 
+       * xdisp.c (move_it_by_lines) <DVPOS < 0>: If not already on
+       a line start, move back to the line start.
+       
        * xdisp.c (resize_echo_area_exactly): Don't resize the mini-window
        exactly when a mini-buffer is active.
 

diff --git a/src/xdisp.c b/src/xdisp.c
index 10e7abe1ddbd214297ade31ab8314e39039ec27a..cb54fc178f593dcc825bf8a4dca07b6e84bb3878 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -5477,6 +5477,12 @@ move_it_by_lines (it, dvpos, need_y_p)
       struct it it2;
       int start_charpos, i;
       
+      /* If we start in the middle of a line, move to the beginning
+        of that line first.  */
+      if (IT_CHARPOS (*it) > BEGV
+         && FETCH_BYTE (IT_BYTEPOS (*it) - 1) != '\n')
+       back_to_previous_visible_line_start (it);
+      
       /* Go back -DVPOS visible lines and reseat the iterator there.  */
       start_charpos = IT_CHARPOS (*it);
       for (i = -dvpos; i && IT_CHARPOS (*it) > BEGV; --i)