diff options
| -rw-r--r-- | lisp/mail/rmail.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 2e441ec16d3..70b0f232ce6 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -2797,7 +2797,12 @@ The current mail message becomes the message displayed." | |||
| 2797 | ;; rmail-header-style based on the binding in effect when | 2797 | ;; rmail-header-style based on the binding in effect when |
| 2798 | ;; this function is called; `rmail-toggle-headers' can | 2798 | ;; this function is called; `rmail-toggle-headers' can |
| 2799 | ;; inspect this value to determine how to toggle. | 2799 | ;; inspect this value to determine how to toggle. |
| 2800 | (set (make-local-variable 'rmail-header-style) header-style)) | 2800 | (set (make-local-variable 'rmail-header-style) header-style) |
| 2801 | ;; In case viewing the previous message sets the paragraph | ||
| 2802 | ;; direction non-nil, we reset it here to allow independent | ||
| 2803 | ;; dynamic determination of paragraph direction in every | ||
| 2804 | ;; message. | ||
| 2805 | (setq bidi-paragraph-direction nil)) | ||
| 2801 | (if (and rmail-enable-mime | 2806 | (if (and rmail-enable-mime |
| 2802 | rmail-show-mime-function | 2807 | rmail-show-mime-function |
| 2803 | (re-search-forward "mime-version: 1.0" nil t)) | 2808 | (re-search-forward "mime-version: 1.0" nil t)) |