emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* patch for BIDI support for org-mime.el
@ 2015-03-29 17:00 Uwe Brauer
  2015-03-29 19:07 ` Dotan Cohen
  0 siblings, 1 reply; 2+ messages in thread
From: Uwe Brauer @ 2015-03-29 17:00 UTC (permalink / raw)
  To: emacs-orgmode

[-- Attachment #1: Type: text/plain, Size: 102 bytes --]

Hello

Attached you find a very small patch which adds BIDI support to org-mime.el
basically it adds
"

[-- Attachment #2: Type: text/html, Size: 59 bytes --]

[-- Attachment #3: Type: text/html, Size: 628 bytes --]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #4: org-mime-bidi.patch --]
[-- Type: text/x-diff, Size: 1414 bytes --]

diff -u /home/oub/.emacs.d/elpa/org-plus-contrib-20130703/org-mime-org.el /home/oub/.emacs.d/elpa/org-plus-contrib-20130703/org-mime.el
--- /home/oub/.emacs.d/elpa/org-plus-contrib-20130703/org-mime-org.el	2015-03-13 20:14:17.000000000 +0100
+++ /home/oub/.emacs.d/elpa/org-plus-contrib-20130703/org-mime.el	2015-03-29 18:55:08.733572911 +0200
@@ -147,6 +147,12 @@
                (buffer-string)))))
     ('vm "?")))
 
+(defvar org-mime-bidi-support nil
+  "*Variable which controls the support for RTL BIDI. Default is
+  nil. It is recommendable to change this variable, once you
+  change, via `set-input-method' to a BIDI language.")
+
+
 (defun org-mime-multipart (plain html &optional images)
   "Markup a multipart/alternative with text/plain and text/html alternatives.
 If the html portion of the message includes images wrap the html
@@ -155,10 +161,12 @@
     ('mml (concat "<#multipart type=alternative><#part type=text/plain>"
 		  plain
 		  (when images "<#multipart type=related>")
-		  "<#part type=text/html>"
+		  (if   org-mime-bidi-support ;add BIDI support
+		      "<#part type=text/html>\n<html style=\"direction: rtl\;\">"
+		    "<#part type=text/html>")
 		  html
 		  images
-		  (when images "<#/multipart>\n")
+		  (when images "</html>\n<#/multipart>\n")
 		  "<#/multipart>\n"))
     ('semi (concat
             "--" "<<alternative>>-{\n"

Diff finished.  Sun Mar 29 18:55:27 2015

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: patch for BIDI support for org-mime.el
  2015-03-29 17:00 patch for BIDI support for org-mime.el Uwe Brauer
@ 2015-03-29 19:07 ` Dotan Cohen
  0 siblings, 0 replies; 2+ messages in thread
From: Dotan Cohen @ 2015-03-29 19:07 UTC (permalink / raw)
  To: emacs-orgmode

Thank you Uwe. I've actually settled on vimwiki but I glance at
orgmode every now and then. This might get me to switch.

Have a great week!

On Sun, Mar 29, 2015 at 8:00 PM, Uwe Brauer <oub@mat.ucm.es> wrote:
> Hello
>
> Attached you find a very small patch which adds BIDI support to org-mime.el
> basically it adds
> "
> \n " instead of simply "
> ") To the htmlized message. A new variable is introduced, namely: org-mime-bidi-support which is per default set to nil. I turn it on when switching to a BIDI language, as in the following function. (defun my-turn-bidi-on () "Just start with to R2L and turn the hebrew (qwerty) keyboard on" (interactive) (setq bidi-paragraph-direction 'right-to-left) (set-face-font 'default "-etl-*-*-*-*-*-*-240-*-*-*-*-ISO8859-8") (setq org-mime-bidi-support t) (set-input-method "hebrew-phonetic-qwerty" t) (message "R2L on and the hebrew qwerty keyboard!")) On off when switching back. Regards Uwe Brauer



-- 
Dotan Cohen

http://gibberish.co.il
http://what-is-what.com

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2015-03-29 19:07 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2015-03-29 17:00 patch for BIDI support for org-mime.el Uwe Brauer
2015-03-29 19:07 ` Dotan Cohen

Code repositories for project(s) associated with this inbox:

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).