aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorChong Yidong2006-08-29 22:17:05 +0000
committerChong Yidong2006-08-29 22:17:05 +0000
commit41d24b39c7a261c08e66a9397e128c639cace0bb (patch)
tree78b1b7a914d4bcd103f243376316151a797f3028 /src
parent0832681690ad4705cc57d6c490d0175d699bd6f6 (diff)
downloademacs-41d24b39c7a261c08e66a9397e128c639cace0bb.tar.gz
emacs-41d24b39c7a261c08e66a9397e128c639cace0bb.zip
* indent.c (Fvertical_motion): Don't move back if we were
displaying a Lisp string, either.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog5
-rw-r--r--src/indent.c13
2 files changed, 12 insertions, 6 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 41f02828c97..68d8c52f388 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
12006-08-29 Chong Yidong <cyd@stupidchicken.com>
2
3 * indent.c (Fvertical_motion): Don't move back if we were
4 displaying a Lisp string, either.
5
12006-08-28 Kim F. Storm <storm@cua.dk> 62006-08-28 Kim F. Storm <storm@cua.dk>
2 7
3 * xdisp.c (get_window_cursor_type) [!HAVE_WINDOW_SYSTEM]: 8 * xdisp.c (get_window_cursor_type) [!HAVE_WINDOW_SYSTEM]:
diff --git a/src/indent.c b/src/indent.c
index cc928f2171f..cbb53c3678f 100644
--- a/src/indent.c
+++ b/src/indent.c
@@ -2074,7 +2074,7 @@ whether or not it is currently displayed in some window. */)
2074 { 2074 {
2075 int it_start; 2075 int it_start;
2076 int oselective; 2076 int oselective;
2077 int start_on_image_or_stretch_p; 2077 int start_on_image_or_stretch_or_string_p;
2078 2078
2079 SET_TEXT_POS (pt, PT, PT_BYTE); 2079 SET_TEXT_POS (pt, PT, PT_BYTE);
2080 start_display (&it, w, pt); 2080 start_display (&it, w, pt);
@@ -2086,8 +2086,9 @@ whether or not it is currently displayed in some window. */)
2086 while the end position is really at some X > 0, the same X that 2086 while the end position is really at some X > 0, the same X that
2087 PT had. */ 2087 PT had. */
2088 it_start = IT_CHARPOS (it); 2088 it_start = IT_CHARPOS (it);
2089 start_on_image_or_stretch_p = (it.method == GET_FROM_IMAGE 2089 start_on_image_or_stretch_or_string_p = (it.method == GET_FROM_IMAGE
2090 || it.method == GET_FROM_STRETCH); 2090 || it.method == GET_FROM_STRETCH
2091 || it.method == GET_FROM_STRING);
2091 reseat_at_previous_visible_line_start (&it); 2092 reseat_at_previous_visible_line_start (&it);
2092 it.current_x = it.hpos = 0; 2093 it.current_x = it.hpos = 0;
2093 /* Temporarily disable selective display so we don't move too far */ 2094 /* Temporarily disable selective display so we don't move too far */
@@ -2098,10 +2099,10 @@ whether or not it is currently displayed in some window. */)
2098 2099
2099 /* Move back if we got too far. This may happen if 2100 /* Move back if we got too far. This may happen if
2100 truncate-lines is on and PT is beyond right margin. 2101 truncate-lines is on and PT is beyond right margin.
2101 It may also happen if it_start is on an image or a stretch 2102 It may also happen if it_start is on an image, stretch
2102 glyph -- in that case, don't go back. */ 2103 glyph, or string -- in that case, don't go back. */
2103 if (IT_CHARPOS (it) > it_start && XINT (lines) > 0 2104 if (IT_CHARPOS (it) > it_start && XINT (lines) > 0
2104 && !start_on_image_or_stretch_p) 2105 && !start_on_image_or_stretch_or_string_p)
2105 move_it_by_lines (&it, -1, 0); 2106 move_it_by_lines (&it, -1, 0);
2106 2107
2107 it.vpos = 0; 2108 it.vpos = 0;