gnus-sum.el (gnus-summary-mode): Force paragraph direction to be left-to-right.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 8e790962c348f88d64570308ceb55bf3fa930126..cdcdac87022fa24e5c4a3d2ee82dbdcc3a8f3135 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2012-01-26  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-sum.el (gnus-summary-mode): Force paragraph direction to be
+       left-to-right.
+
 2012-01-21  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * mm-decode.el (mm-interactively-view-part): Fix prompt.

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 878a96b92648826ff0d874760793e97275e1005d..50178596e6c089d8f1c589651a03e7ba72cd2d88 100644 (file)
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -3063,6 +3063,8 @@ When FORCE, rebuild the tool bar."
 (defvar bookmark-make-record-function)
 \f
 
+(defvar bidi-paragraph-direction)
+
 (defun gnus-summary-mode (&optional group)
   "Major mode for reading articles.
 
@@ -3101,6 +3103,8 @@ The following commands are available:
   (setq buffer-read-only t             ;Disable modification
        show-trailing-whitespace nil)
   (setq truncate-lines t)
+  ;; Force paragraph direction to be left-to-right.
+  (setq bidi-paragraph-direction 'left-to-right)
   (add-to-invisibility-spec '(gnus-sum . t))
   (gnus-summary-set-display-table)
   (gnus-set-default-directory)