Fix fringe truncation bitmaps in R2L lines.

 fringe.c (update_window_fringes): Set up truncation bitmaps for R2L lines.

diff --git a/src/ChangeLog b/src/ChangeLog
index 296c468f2ee89bdc00ba7ac7a3020d2cb7eeea67..1ec145b72fd443fcbe29f2c50c4fde45949a0997 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2010-05-08  Eli Zaretskii  <eliz@gnu.org>
+
+       * fringe.c (update_window_fringes): Set up truncation bitmaps for
+       R2L lines.
+
 2010-05-08  Glenn Morris  <rgm@gnu.org>
 
        * Makefile.in (THIS_IS_MAKEFILE): Remove, unused.

diff --git a/src/fringe.c b/src/fringe.c
index cfb944d58d172524cb387b7bb8845f5a3cdf8d80..6dcacbbcd3fcb69a70523e9ea602f2d02566932a 100644 (file)
--- a/src/fringe.c
+++ b/src/fringe.c
@@ -1082,7 +1082,8 @@ update_window_fringes (w, keep_current_p)
          left = row->left_user_fringe_bitmap;
          left_face_id = row->left_user_fringe_face_id;
        }
-      else if (row->truncated_on_left_p)
+      else if ((!row->reversed_p && row->truncated_on_left_p)
+              || (row->reversed_p && row->truncated_on_right_p))
        left = LEFT_FRINGE(0, Qtruncation, 0);
       else if (row->indicate_bob_p && EQ (boundary_top, Qleft))
        left = ((row->indicate_eob_p && EQ (boundary_bot, Qleft))
@@ -1110,7 +1111,8 @@ update_window_fringes (w, keep_current_p)
          right = row->right_user_fringe_bitmap;
          right_face_id = row->right_user_fringe_face_id;
        }
-      else if (row->truncated_on_right_p)
+      else if ((!row->reversed_p && row->truncated_on_right_p)
+              || (row->reversed_p && row->truncated_on_left_p))
        right = RIGHT_FRINGE (0, Qtruncation, 0);
       else if (row->indicate_bob_p && EQ (boundary_top, Qright))
        right = ((row->indicate_eob_p && EQ (boundary_bot, Qright))