[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r105643: Fix display by Rmail of bidi
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r105643: Fix display by Rmail of bidirectional text in MIME email messages. |
Date: |
Sat, 03 Sep 2011 11:44:16 +0300 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 105643
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Sat 2011-09-03 11:44:16 +0300
message:
Fix display by Rmail of bidirectional text in MIME email messages.
lisp/mail/rmailmm.el (rmail-mime-insert-tagline): Insert an extra
newline before and after the tag line, so it doesn't interfere
with determining the paragraph direction of bidirectional text.
modified:
lisp/ChangeLog
lisp/mail/rmail.el
lisp/mail/rmailmm.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-09-03 01:41:27 +0000
+++ b/lisp/ChangeLog 2011-09-03 08:44:16 +0000
@@ -1,3 +1,9 @@
+2011-09-03 Eli Zaretskii <address@hidden>
+
+ * mail/rmailmm.el (rmail-mime-insert-tagline): Insert an extra
+ newline before and after the tag line, so it doesn't interfere
+ with determining the paragraph direction of bidirectional text.
+
2011-09-03 Leo Liu <address@hidden>
* files.el (find-file-not-true-dirname-list): Remove. (Bug#9422)
=== modified file 'lisp/mail/rmail.el'
--- a/lisp/mail/rmail.el 2011-08-31 20:49:24 +0000
+++ b/lisp/mail/rmail.el 2011-09-03 08:44:16 +0000
@@ -4482,7 +4482,7 @@
;;;***
-;;;### (autoloads (rmail-mime) "rmailmm" "rmailmm.el"
"a7d3e7205efa4e20ca9038c9b260ce83")
+;;;### (autoloads (rmail-mime) "rmailmm" "rmailmm.el"
"2c8675d7c069c68bc36a4003b15448d1")
;;; Generated autoloads from rmailmm.el
(autoload 'rmail-mime "rmailmm" "\
=== modified file 'lisp/mail/rmailmm.el'
--- a/lisp/mail/rmailmm.el 2011-07-06 22:43:46 +0000
+++ b/lisp/mail/rmailmm.el 2011-09-03 08:44:16 +0000
@@ -426,7 +426,7 @@
"Insert a tag line for MIME-entity ENTITY.
ITEM-LIST is a list of strings or button-elements (list) to be added
to the tag line."
- (insert "[")
+ (insert "\n[")
(let ((tag (aref (rmail-mime-entity-tagline entity) 0)))
(if (> (length tag) 0) (insert (substring tag 1) ":")))
(insert (car (rmail-mime-entity-type entity)) " ")
@@ -439,7 +439,7 @@
(if (stringp item)
(insert item)
(apply 'insert-button item))))
- (insert "]\n"))
+ (insert "]\n\n"))
(defun rmail-mime-update-tagline (entity)
"Update the current tag line for MIME-entity ENTITY."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105643: Fix display by Rmail of bidirectional text in MIME email messages.,
Eli Zaretskii <=