diff options
| author | Katsumi Yamaoka | 2012-01-26 10:38:22 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2012-01-26 10:38:22 +0000 |
| commit | d1caca805e681fd25e9c349aa30ddf7ead9c25ec (patch) | |
| tree | 5512d0759fb600807029b94e8b09e21287a0ca24 | |
| parent | 48da73922734c056f48ed3cd675a97369ac025ea (diff) | |
| download | emacs-d1caca805e681fd25e9c349aa30ddf7ead9c25ec.tar.gz emacs-d1caca805e681fd25e9c349aa30ddf7ead9c25ec.zip | |
gnus-sum.el (gnus-summary-mode): Force paragraph direction to be left-to-right.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 4 |
2 files changed, 9 insertions, 0 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 8e790962c34..cdcdac87022 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-01-26 Katsumi Yamaoka <yamaoka@jpl.org> | ||
| 2 | |||
| 3 | * gnus-sum.el (gnus-summary-mode): Force paragraph direction to be | ||
| 4 | left-to-right. | ||
| 5 | |||
| 1 | 2012-01-21 Lars Magne Ingebrigtsen <larsi@gnus.org> | 6 | 2012-01-21 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 7 | ||
| 3 | * mm-decode.el (mm-interactively-view-part): Fix prompt. | 8 | * mm-decode.el (mm-interactively-view-part): Fix prompt. |
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 878a96b9264..50178596e6c 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -3063,6 +3063,8 @@ When FORCE, rebuild the tool bar." | |||
| 3063 | (defvar bookmark-make-record-function) | 3063 | (defvar bookmark-make-record-function) |
| 3064 | 3064 | ||
| 3065 | 3065 | ||
| 3066 | (defvar bidi-paragraph-direction) | ||
| 3067 | |||
| 3066 | (defun gnus-summary-mode (&optional group) | 3068 | (defun gnus-summary-mode (&optional group) |
| 3067 | "Major mode for reading articles. | 3069 | "Major mode for reading articles. |
| 3068 | 3070 | ||
| @@ -3101,6 +3103,8 @@ The following commands are available: | |||
| 3101 | (setq buffer-read-only t ;Disable modification | 3103 | (setq buffer-read-only t ;Disable modification |
| 3102 | show-trailing-whitespace nil) | 3104 | show-trailing-whitespace nil) |
| 3103 | (setq truncate-lines t) | 3105 | (setq truncate-lines t) |
| 3106 | ;; Force paragraph direction to be left-to-right. | ||
| 3107 | (setq bidi-paragraph-direction 'left-to-right) | ||
| 3104 | (add-to-invisibility-spec '(gnus-sum . t)) | 3108 | (add-to-invisibility-spec '(gnus-sum . t)) |
| 3105 | (gnus-summary-set-display-table) | 3109 | (gnus-summary-set-display-table) |
| 3106 | (gnus-set-default-directory) | 3110 | (gnus-set-default-directory) |