Giter Site home page Giter Site logo

Comments (31)

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024 2

Good advice.

https://www.reddit.com/r/emacs/comments/d06ee9/version_20_of_orgmsg_which_is_a_gnuemacs_global/

Let's see.

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024 1

Hi Thorsten,

as far as I can see, this is the best solution for sending and replying to html mails with mu4e, great work! Org-mime makes a lot more problems.

Thank you I really appreciate the feedback. I also believe this module is great but for some reasons it did not drag a lot of attention. Maybe not enough people are looking at a solution like this. By the way, how did you end up looking at org-msg ?

After testing I found out two things. If one attach a file, the selection is done with ido, is it possible to use ivy instead?

Yes that's because I use ido by default. I know this is not an excuse. I have decided to remove this dependency, uploaded the patch and just published version 1.8 which include this fix. And I am going to give a try to ivy :)

How can I modify the style-sheet to get for example a larger font which is not Arial, say Callibri here?

This one is easy to achieve. org-msg already support a style-sheet definition. The org-msg-enforce-css can be either a style-sheet in as associated list or a file path of a CSS file. The CSS file should work but has not been tested extensively so it could lead to issues and I would advice that you define your own style-sheet in you configuration file.

(defconst org-msg-default-style
  (let* ((font-family '(font-family . "\"Arial\""))
	 (font-size '(font-size . "10pt"))
	 (font `(,font-family ,font-size))
	 (line-height '(line-height . "10pt"))
	 (bold '(font-weight . "bold"))
	 (theme-color "#0071c5")
	 (color `(color . ,theme-color))
	 (table `(,@font (margin-top . "0px")))
[...]

(defcustom org-msg-enforce-css org-msg-default-style
  "Define how to handle CSS style:
- list - style definition: see `org-msg-default-style' for
  example.
- string - path to a CSS file: same as t but use this file
  definitions."
  :type '(choice (file :must-match t)
		 (list (list symbol symbol
			     (alist :value-type string)))))

As an alternative, you could evaluate the following expression in your configuration file after loading the org-msg module. It should automatically adjust the font and the size to Calibri, 12pt:

(dolist (cur org-msg-enforce-css)
  (when (and (assoc 'font-family (caddr cur))
	     (not (string= (assoc-default 'font-family (caddr cur)) "monospace")))
    (setf (alist-get 'font-family (caddr cur)) "\"Calibri\"")
    (when (assoc 'font-size (caddr cur))
      (setf (alist-get 'font-size (caddr cur)) "12pt"))))

Let me know which method you will have used to configure this part.

Regards,

-- Jeremy
One Emacs to rule them all

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Hi Jeremy,

well I searched a lot to find a way to write html mails with emacs/mu4e. And suddenly I found something on reddit I guess :-)

BTW did you answer with emacs/gnus or directly with github? In a ideal world org-msg would allow me to answer like you did (quotes and comments) and the result would look like your answer. But I guess this is not possible?

Ahh ivy is working, very nice, now it's much simpler for me to attach something, well I'm a ivy/counsel/hydra guy :-)

I tried your second approach and it works fine, it's very simple to set font size like you did, thanks a lot, that helped a lot!!!!

I found some other issues with org-msg and mu4e need to test something and will report later!

Regards
thorsten

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi Thorsten,

well I searched a lot to find a way to write html mails with emacs/mu4e. And suddenly I found something on reddit I guess :-)

Nice. If you still have the reddit link in your history could you
share it with me ?

BTW did you answer with emacs/gnus or directly with github? In a ideal world org-msg would allow me to answer like you did (quotes and comments) and the result would look like your answer. But I guess this is not possible?

I answered directly in github. However, I used Emacs to compose. I worked in org-mode and exported in a mardown buffer and then copy/paste.

Ahh ivy is working, very nice, now it's much simpler for me to attach something, well I'm a ivy/counsel/hydra guy :-)

I gave it a try for 24 hours and rolled back to ido. I still find ido to be more efficient. I had an extra key stroke with ivy on a basic use-case that I use hundreds of times a day. Also, I am not a big fan on the multilines and the fact that I have to watch two lines at the same time. ivy is fancier and look nicer but I find it less efficient. Efficiency wins for me ;)

I tried your second approach and it works fine, it's very simple to set font size like you did, thanks a lot, that helped a lot!!!!

I am glad it works !

I found some other issues with org-msg and mu4e need to test something and will report later!

I don't use mu4e, I use gnus instead. Julien worked on the mu4e support. I helped him to make it modular. I think that Julien told me that he moved to notmuch ⇒ If you find a issue, you will have to report a lot of details so that I can help or debug it yourself.

Regards,

Jeremy
One Emacs to rule them all

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Hi Jeremy

sorry for my late response, I was on holidays for some days :-)

Nice. If you still have the reddit link in your history could you
share it with me ?

Yes of course here is the reddit link you have to scroll down a bit or search for the user dakra.

(...)

I gave it a try for 24 hours and rolled back to ido. I still find ido to be more efficient. I had an extra key stroke with ivy on a basic use-case that I use hundreds of times a day. Also, I am not a big fan on the multilines and the fact that I have to watch two lines at the same time. ivy is fancier and look nicer but I find it less efficient. Efficiency wins for me ;)

yes, I know ido is ugly but efficient :)

(...)

I don't use mu4e, I use gnus instead. Julien worked on the mu4e support. I helped him to make it modular. I think that Julien told me that he moved to notmuch ⇒ If you find a issue, you will have to report a lot of details so that I can help or debug it yourself.

Oh that's sad. This package is very promising and the only one I know which has the ability to work stable. Honestly I don't want to switch to notmuch, I see no reason for this. Gnus is too complicated for me :-)

There are two things, that do not work correctly:

  1. Mu4e has a address autocomplete function which is triggered when you hit tab on the To: field. This works perfectly in mu4e-compose-mode but not in org-msg-mode.

  2. When I compose a message in org-msg-mode everything works fine. But the message is not copied to my sent folder after sending it, that's really a serious problem for me :-)

I guess both issues have something to do with the incompatibility of mu4e-compose-mode/org-msg-mode. Is there anything I can do to fix this?

Regards
Thorsten

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi Thorsten,

Mu4e has a address autocomplete function which is triggered when you hit tab on the To: field. This works perfectly in mu4e-compose-mode but not in org-msg-mode.

This is a bit of a surprise because I looked at the mu4e source and org-msg source and I am under the impression that the mu4e~compose-setup-completion function which is the one supposed to configure this should be called when the org-msg-edit-mode is turned on. If you manually call the mu4e~compose-setup-completion from the buffer does it start working ?

357  (defun mu4e~compose-setup-completion ()
358    "Set up auto-completion of addresses."
359    (set (make-local-variable 'completion-ignore-case) t)
360    (set (make-local-variable 'completion-cycle-threshold) 7)
361    (add-to-list (make-local-variable 'completion-styles) 'substring)
362    (add-hook 'completion-at-point-functions
363      'mu4e~compose-complete-contact nil t))

953  (defun org-msg-edit-mode-mu4e ()
954    "Setup mu4e faces, addresses completion and run mu4e."
955    (mu4e~compose-remap-faces)
956    (mu4e~start)
957    (when mu4e-compose-complete-addresses
958      (mu4e~compose-setup-completion)))

972  (define-derived-mode org-msg-edit-mode org-mode "OrgMsg"
973    "Major mode to compose email using Org mode.
974  Like Org Mode but with these additional/changed commands:
975  Type \\[org-ctrl-c-ctrl-c] to send the message if the cursor is
976    not a C-c C-c Org mode controlled region (Org babel for
977    example).
978  Type \\[org-msg-preview] to preview the final email with
979    `browse-url'.
980  Type \\[message-kill-buffer] to kill the current OrgMsg buffer.
981  Type \\[message-goto-subject] to move the point to the Subject
982    header.
983  Type \\[org-msg-goto-body] to move the point to the beginning of
984    the message body.
985  Type \\[org-msg-attach] to call the dispatcher for attachment
986    commands.
987  
988  \\{org-msg-edit-mode-map}"
989    (set (make-local-variable 'message-sent-message-via) nil)
990    (add-hook 'completion-at-point-functions 'message-completion-function nil t)
991    (setq org-font-lock-keywords
992  	(append org-font-lock-keywords message-font-lock-keywords
993  		org-msg-font-lock-keywords))
994    (toggle-truncate-lines)
995    (org-msg-mua-call 'edit-mode)
996    (setq-local kill-buffer-hook 'org-msg-kill-buffer)
997    (unless (= (org-msg-end) (point-max))
998      (add-text-properties (1- (org-msg-end)) (point-max) '(read-only t))))
999  

When I compose a message in org-msg-mode everything works fine. But the message is not copied to my sent folder after sending it, that's really a serious problem for me :-)

According to the mu4e source code Message Mode documentation, I believe that you should be able to make that part work by adding a Fcc: path. You just need to figure out the right path which you can certainly deduce by looking at the mu4e~compose-setup-fcc-maybe function code.

228  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
229  
230  ;; 'fcc' refers to saving a copy of a sent message to a certain folder. that's
231  ;; what these 'Sent mail' folders are for!
232  ;;
233  ;; We let message mode take care of this by adding a field
234  
235  ;;   Fcc: <full-path-to-message-in-target-folder>
236  
237  ;; in the "message-send-hook" (ie., just before sending).  message mode will
238  ;; then take care of the saving when the message is actually sent.
239  ;;
240  ;; note, where and if you make this copy depends on the value of
241  ;; `mu4e-sent-messages-behavior'.
242  

For your information, I will be AFK for the next 10 days.

Regards,

Jeremy
One Emacs to rule them all

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Dear Jeremy,

I could solve the adress autocomplete problem. It works fine now. I found this code and modified it a bit, now it works very good

mu4e contact completion

If you like to see the complete code with minimal modifications I can post it here.

The fcc problem is on my list. At the moment I have another problem. Sometimes it happens that I compose a mail with org-msg-mode and send it afterwards. Now a buffer stays on and emacs ask me if I want to save it. Anyway the message is send correctly, see my screenshot, hope it make it clearer

org-msg-error

Normally when I hitt C-c the buffer is closed and the mail is send, here with msmtp. You see in my screenshot the references (see the arrow), this happens normally not. As I said the message is delivered correctly but the buffer stays open. I happens not in mu4e-compose-mode and it happens when I respond to mail threads with many messages. I have just no clue what to do.

One thing I forgot: How can I mark multiple files when I attach something with C-c-a? When I hit that I got [ad] in my minibuffer, than I hit a and ivy comes up. When I'm in the directory I want I would like to select multiple files and attach them, how can I do this?

Anyway the package is great!!

Regards
Thorsten

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

And something new. I replied to a mail and got this message, the mail is not delivered. Hm, what's that?

Mark set [2 times]
org-msg-build: Wrong type argument: consp, nil
Auto-saving...
user-error: Minibuffer window is not active
Auto-saving...
Message modified; kill anyway? (y or n) y
Mark set 

Regards
Thorsten

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi Thorsten,

I could solve the adress autocomplete problem. It works fine now. I found this code and modified it a bit, now it works very good

mu4e contact completion

If you like to see the complete code with minimal modifications I can post it here.

I would like to in particular if you think that this should be covered
by the org-msg support for mu4e backend.

Normally when I hitt C-c the buffer is closed and the mail is send, here with msmtp. You see in my screenshot the references (see the arrow), this happens normally not. As I said the message is delivered correctly but the buffer stays open. I happens not in mu4e-compose-mode and it happens when I respond to mail threads with many messages. I have just no clue what to do.

This is interesting I have noticed this problem too ⇒ It has nothing to do with the mu4e backend support and is likely an overall issue with message-mode and/or org-msg-edit-mode. Unfortunately, working on this issue really is not easy as I usually reproduce it on big mail thread with many people on the list. I can't send email to so many people while I debug the issue. In my case, it even get kind of stuck sometime and I have to hit C-g. The message is sent but I am back on the email buffer. If you or I find a way to narrow it to a use case where I don't have to sent email to many people and I can consistently reproduce then I should be able to work on it. I am going to keep that in mind. Of course, now that I am trying to reproduce the issue the issue does not reproduce.

One thing I forgot: How can I mark multiple files when I attach something with C-c-a? When I hit that I got [ad] in my minibuffer, than I hit a and ivy comes up. When I'm in the directory I want I would like to select multiple files and attach them, how can I do this?

Well this is not supported but it could be a nice addition even though I am not convinced that adding many files is a common use-case.

I could write a dired minor mode similar to gnus-dired-mode but this is low priority on my list. While I was looking at this I found a bug that I have just fixed (see Fix Org Attach buffer not popping up).

And something new. I replied to a mail and got this message, the mail is not delivered. Hm, what's that?

Mark set [2 times]
org-msg-build: Wrong type argument: consp, nil
Auto-saving...
user-error: Minibuffer window is not active
Auto-saving...
Message modified; kill anyway? (y or n) y
Mark set 

This one is new to me. It looks like something went wrong in org-msg-build. If you can reproduce the issue, enable debug mode with M-x toggle-debug-on-error, reproduce and share the stack.

Regards,

Jeremy
One Emacs to rule them all

from org-msg.

podiki avatar podiki commented on May 31, 2024

I'm interested in trying out org-msg for occasional org/html emails, and ran into the same problem with the message not going to a sent folder, also with mu4e. I think the issue might be message-send-hook: using org-msg-mode that ends up just being org-msg-prepare-to-send while without org-msg-mode it has a long list of functions from mu4e. Here is where the function you mentioned above, mu4e~compose-setup-fcc-maybe, appears as a hook to take care of sent message behavior. I don't know enough about hooks in emacs to figure out what should be done (I was guessing maybe the optional argument of the hook being local only, but I don't think that worked).

Any ideas how to fix this? I wonder if this is related to any other possible issues with mu4e compose that might pop up.

And thanks for the work on this package, looks to be an easy integration for handling org mode composing!

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi John and Thorsten,

Could you try the following change ?

modified   org-msg.el
@@ -955,6 +955,7 @@ HTML emails."
   "Setup mu4e faces, addresses completion and run mu4e."
   (mu4e~compose-remap-faces)
   (mu4e~start)
+  (mu4e~compose-setup-fcc-maybe)
   (when mu4e-compose-complete-addresses
     (mu4e~compose-setup-completion)))

based on my code reading it should add the Fcc field which seems to be what you need. If it works, I will make a commit for it.

Jeremy
One Emacs to rule them all

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi John and Thorsten,

Could you give a try to the experimental branch that I just created and provide me your feedback ?

Jeremy
One Emacs to rule them all

from org-msg.

podiki avatar podiki commented on May 31, 2024

Hi @jeremy-compostella,

Thanks, works for me! I see the FCC field show up when composing a message, and a copy ends up in the sent folder (and is then synced correctly). Was there anything else you wanted tested? The sent issue was the only thing I saw come up in my quick testing before, this looks great.

John

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Dear both of you,

I have a lot of other things to do at them moment, but I'm following all messages here, I'm on it and I will test if I have more time. Love this package!

Regards
Thorsten

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Ok, I tested the experimental branch. Yes, the FCC field is showing up correctly and a copy is saved to the sent folder, this is great !!!!!!

When I reply to this mail I got an error:

error in process filter: insert: Wrong number of arguments: mapconcat, 2

see here

22-26-02

from org-msg.

podiki avatar podiki commented on May 31, 2024

Can confirm same error on replying to a message.

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

from org-msg.

podiki avatar podiki commented on May 31, 2024

This is what I get:

Debugger entered--Lisp error: (wrong-number-of-arguments mapconcat 2)
  (mapconcat --cl-field2str-- (quote ((:from function mails2str) (:subject (quote identity)) (:to function mails2str) (:date (quote message-make-date)))))
  (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote ((:from function mails2str) (:subject (quote identity)) (:to function mails2str) (:date (quote message-make-date))))) "</div>\n<hr>\n")
  (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote ((:from function mails2str) (:subject (quote identity)) (:to function mails2str) (:date (quote message-make-date))))) "</div>\n<hr>\n"))
  (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote ((:from function mails2str) (:subject (quote identity)) (:to function mails2str) (:date (quote message-make-date))))) "</div>\n<hr>\n")))
  (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote ((:from function mails2str) (:subject ...) (:to function mails2str) (:date ...)))) "</div>\n<hr>\n"))) (write-file file))
  (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote (... ... ... ...))) "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (quote ...)) "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region ... ...)))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- ...) "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
  (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn ...))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char ...) (insert "<div align=\"left\">\n" ... "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file))
  (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" (capitalize (substring ... 1)) (funcall (cdr e) (mu4e-message-field msg ...))))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if ... ...)) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn ... ...)) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file)))
  (progn (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" (capitalize ...) (funcall ... ...)))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion ...) (save-excursion ...) (if ... ...) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file))))
  (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat (function (lambda ... ...)) l ", "))))) (progn (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" ... ...))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ... ...) (and ... ...)))) (list file)))))
  (let* ((msg (mu4e-message-at-point)) (html (mu4e-message-field msg :body-html)) (file (concat "/tmp/" (mu4e-message-field msg :message-id)))) (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat (function ...) l ", "))))) (progn (let* ((--cl-field2str-- (function (lambda ... ...)))) (progn (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...))) (list file))))))
  (save-current-buffer (set-buffer mu4e~view-buffer-name) (let* ((msg (mu4e-message-at-point)) (html (mu4e-message-field msg :body-html)) (file (concat "/tmp/" (mu4e-message-field msg :message-id)))) (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat ... l ", "))))) (progn (let* ((--cl-field2str-- (function ...))) (progn (let (...) (save-current-buffer ... ...)) (list file)))))))
  org-msg-save-article-for-reply-mu4e()
  apply(org-msg-save-article-for-reply-mu4e nil)
  (progn (apply fun arg))
  (if (functionp fun) (progn (apply fun arg)))
  (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg))))
  (if mua (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg)))) (error "Backend not found"))
  (let ((mua (assoc-default mail-user-agent org-msg-supported-mua))) (if mua (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg)))) (error "Backend not found")))
  org-msg-mua-call(save-article-for-reply)
  (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))
  (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply))))
  (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" (org-msg-get-to-first-name)))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region (line-beginning-position) (1+ (line-end-position))) (save-excursion (while (re-search-forward "^>+ *" nil t) (replace-match ""))) (org-escape-code-in-region (point) (point-max))))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode)))
  (if (or new (org-msg-mua-call (quote article-htmlp))) (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" (org-msg-get-to-first-name)))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region (line-beginning-position) (1+ ...)) (save-excursion (while ... ...)) (org-escape-code-in-region (point) (point-max))))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode))))
  (let ((new (not (and (message-fetch-field "to") (message-fetch-field "subject")))) (with-original (not (= (point) (point-max)))) (reply-to)) (if (or new (org-msg-mua-call (quote article-htmlp))) (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" ...))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region ... ...) (save-excursion ...) (org-escape-code-in-region ... ...)))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode)))) (if new (message-goto-to) (org-msg-goto-body)))
  org-msg-post-setup()
  run-hooks(change-major-mode-after-body-hook text-mode-hook message-mode-hook mu4e-compose-mode-hook)
  apply(run-hooks (change-major-mode-after-body-hook text-mode-hook message-mode-hook mu4e-compose-mode-hook))
  run-mode-hooks(mu4e-compose-mode-hook)
  mu4e-compose-mode()
  mu4e~compose-handler(reply (:docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") nil)
  mu4e~proc-filter(#<process  *mu4e-proc*> "\376dc7\377(:compose reply :original (\n\011:docid 38038\n\011:subject \"org-msg test\"\n\011:date (23920 3726 0)\n\011:size 3233\n\011:message-id \"[email protected]\"\n\011:path \"/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S\"\n\011:maildir \"/gmail/trash\"\n\011:priority normal\n\011:flags (seen)\n\011:parts ((:index 1 :name \"1.msgpart\" :mime-type \"text/html\" :type (leaf inline) :attachment nil  :size 2867  ))\n\011:from ((\"John Kehayias\" . \"[email protected]\"))\n\011:to ((\"John Kehayias\" . \"[email protected]\"))\n\011:user-agent \"mu4e 1.3.4; emacs 26.3\"\n\011:body-html \"<html xmlns=\\\"http://www.w3.org/1999/xhtml\\\" lang=\\\"en\\\" xml:lang=\\\"en\\\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\\\"Content-Type\\\" content=\\\"text/html;charset=utf-8\\\"/><meta name=\\\"viewport\\\" content=\\\"width=device-width, initial-scale=1\\\"/><meta name=\\\"generator\\\" content=\\\"Org mode\\\"/><meta name=\\\"author\\\" content=\\\"John Kehayias\\\"/></head><body>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"content\\\">\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\nThis is a test of <code style=\\\"font-size:10pt;font-family:monospace;background:#f9f9f9;\\\">org-mode</code>\n</p>\n\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\n<b>bold</b> <i>italic</i> <span class=\\\"underline\\\">underlinedon'twork?</span> <code style=\\\"font-size:10pt;font-family:monospace;background:#f9f9f9;\\\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\\\"><li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">a numbered list</li>\n<li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">with some numbers</li>\n</ol><div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"outline-container-orgfff3f56\\\">\n<h2 style=\\\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\\\" id=\\\"orgfff3f56\\\">heading 1</h2>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"text-orgfff3f56\\\">\n</div>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"outline-container-org66b0f05\\\">\n<h3 style=\\\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\\\" id=\\\"org66b0f05\\\">heading 2</h3>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"text-org66b0f05\\\">\n<ul style=\\\"list-style-type:square;\\\"><li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">some</li>\n<li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">bullets</li>\n</ul><p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\n\\\\(x_1 + 1 = 100^2 \\\\Sigma_0^\\\\infinity \\\\alpha\\\\)\n</p>\n\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>\"\n)\n :include nil)\n")

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

I pushed an extra change on the experimental branch which should take care of this problem.

Please let me know if it resolves this issue. As you know I don't use mu4e so I cannot test the specific to mu4e function easily.

from org-msg.

podiki avatar podiki commented on May 31, 2024

Fails with the following error, looks related to what you are trying to fix from other issues (I'm current, on 67fb16e):

Debugger entered--Lisp error: (invalid-function (identity))
  (identity)("org-msg test")
  funcall((identity) "org-msg test")
  (format "%s: %s<br>\n" (capitalize (substring (symbol-name (car f)) 1)) (funcall (cdr f) (mu4e-message-field msg (car f))))
  (closure ((--cl-mails2str-- closure ((file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (l) (mapconcat (function (lambda (m) (format "%S &lt;%s&gt;" (car m) (cdr m)))) l ", ")) (file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (f) (format "%s: %s<br>\n" (capitalize (substring (symbol-name (car f)) 1)) (funcall (cdr f) (mu4e-message-field msg (car f)))))((:subject identity))
  mapconcat((closure ((--cl-mails2str-- closure ((file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type ... :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (l) (mapconcat (function (lambda (m) (format "%S &lt;%s&gt;" ... ...))) l ", ")) (file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (f) (format "%s: %s<br>\n" (capitalize (substring (symbol-name (car f)) 1)) (funcall (cdr f) (mu4e-message-field msg (car f))))) ((:from closure ((file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (l) (mapconcat (function (lambda (m) (format "%S &lt;%s&gt;" (car m) (cdr m)))) l ", ")) (:subject identity) (:to closure ((file . "/tmp/[email protected]") (html . "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") (msg :docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") t) (l) (mapconcat (function (lambda (m) (format "%S &lt;%s&gt;" (car m) (cdr m)))) l ", ")) (:date message-make-date)) "")
  (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons (cons (quote :from) --cl-mails2str--) (cons (quote (:subject identity)) (cons (cons (quote :to) --cl-mails2str--) (quote ((:date message-make-date)))))) "") "</div>\n<hr>\n")
  (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons (cons (quote :from) --cl-mails2str--) (cons (quote (:subject identity)) (cons (cons (quote :to) --cl-mails2str--) (quote (...))))) "") "</div>\n<hr>\n"))
  (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons (cons (quote :from) --cl-mails2str--) (cons (quote (:subject identity)) (cons (cons ... --cl-mails2str--) (quote ...)))) "") "</div>\n<hr>\n")))
  (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons (cons (quote :from) --cl-mails2str--) (cons (quote ...) (cons ... ...))) "") "</div>\n<hr>\n"))) (write-file file))
  (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons (cons ... --cl-mails2str--) (cons ... ...)) "") "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region (point-min) (match-beginning 0))))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- (cons ... ...) "") "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn (delete-region ... ...)))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char (match-end 0)) (insert "<div align=\"left\">\n" (mapconcat --cl-field2str-- ... "") "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
  (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if (re-search-forward "^<html\\(.*?\\)>" nil t) (progn ...))) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn (goto-char ...) (insert "<div align=\"left\">\n" ... "</div>\n<hr>\n"))) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file))
  (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" (capitalize (substring ... 1)) (funcall (cdr f) (mu4e-message-field msg ...))))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion (insert html)) (save-excursion (if ... ...)) (if (re-search-forward "<body\\(.*?\\)>" nil t) (progn ... ...)) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file)))
  (progn (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" (capitalize ...) (funcall ... ...)))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (save-excursion ...) (save-excursion ...) (if ... ...) (write-file file)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (list file))))
  (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat (function (lambda ... ...)) l ", "))))) (progn (let* ((--cl-field2str-- (function (lambda (f) (format "%s: %s<br>\n" ... ...))))) (progn (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ... ...) (and ... ...)))) (list file)))))
  (let* ((msg (mu4e-message-at-point)) (html (mu4e-message-field msg :body-html)) (file (concat "/tmp/" (mu4e-message-field msg :message-id)))) (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat (function ...) l ", "))))) (progn (let* ((--cl-field2str-- (function (lambda ... ...)))) (progn (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...))) (list file))))))
  (save-current-buffer (set-buffer mu4e~view-buffer-name) (let* ((msg (mu4e-message-at-point)) (html (mu4e-message-field msg :body-html)) (file (concat "/tmp/" (mu4e-message-field msg :message-id)))) (let* ((--cl-mails2str-- (function (lambda (l) (mapconcat ... l ", "))))) (progn (let* ((--cl-field2str-- (function ...))) (progn (let (...) (save-current-buffer ... ...)) (list file)))))))
  org-msg-save-article-for-reply-mu4e()
  apply(org-msg-save-article-for-reply-mu4e nil)
  (progn (apply fun arg))
  (if (functionp fun) (progn (apply fun arg)))
  (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg))))
  (if mua (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg)))) (error "Backend not found"))
  (let ((mua (assoc-default mail-user-agent org-msg-supported-mua))) (if mua (let ((fun (intern (format "org-msg-%s-%s" sym mua)))) (if (functionp fun) (progn (apply fun arg)))) (error "Backend not found")))
  org-msg-mua-call(save-article-for-reply)
  (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))
  (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply))))
  (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" (org-msg-get-to-first-name)))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region (line-beginning-position) (1+ (line-end-position))) (save-excursion (while (re-search-forward "^>+ *" nil t) (replace-match ""))) (org-escape-code-in-region (point) (point-max))))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode)))
  (if (or new (org-msg-mua-call (quote article-htmlp))) (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" (org-msg-get-to-first-name)))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region (line-beginning-position) (1+ ...)) (save-excursion (while ... ...)) (org-escape-code-in-region (point) (point-max))))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode))))
  (let ((new (not (and (message-fetch-field "to") (message-fetch-field "subject")))) (with-original (not (= (point) (point-max)))) (reply-to)) (if (or new (org-msg-mua-call (quote article-htmlp))) (progn (if new nil (setq reply-to (org-msg-mua-call (quote save-article-for-reply)))) (insert (org-msg-header reply-to)) (if org-msg-greeting-fmt (progn (insert (format org-msg-greeting-fmt (if new "" ...))))) (save-excursion (if with-original (progn (save-excursion (insert "\n\n" org-msg-separator "\n") (delete-region ... ...) (save-excursion ...) (org-escape-code-in-region ... ...)))) (if org-msg-signature (progn (insert org-msg-signature))) (org-msg-edit-mode)))) (if new (message-goto-to) (org-msg-goto-body)))
  org-msg-post-setup()
  run-hooks(change-major-mode-after-body-hook text-mode-hook message-mode-hook mu4e-compose-mode-hook)
  apply(run-hooks (change-major-mode-after-body-hook text-mode-hook message-mode-hook mu4e-compose-mode-hook))
  run-mode-hooks(mu4e-compose-mode-hook)
  mu4e-compose-mode()
  mu4e~compose-handler(reply (:docid 38038 :subject "org-msg test" :date (23920 3726 0) :size 3233 :message-id "[email protected]" :path "/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S" :maildir "/gmail/trash" :priority normal :flags (seen) :parts ((:index 1 :name "1.msgpart" :mime-type "text/html" :type (leaf inline) :attachment nil :size 2867)) :from (("John Kehayias" . "[email protected]")) :to (("John Kehayias" . "[email protected]")) :user-agent "mu4e 1.3.4; emacs 26.3" :body-html "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\"/><meta name=\"viewport\" content=\"width=device-width, initial-scale=1\"/><meta name=\"generator\" content=\"Org mode\"/><meta name=\"author\" content=\"John Kehayias\"/></head><body>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"content\">\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nThis is a test of <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">org-mode</code>\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n<b>bold</b> <i>italic</i> <span class=\"underline\">underlinedon'twork?</span> <code style=\"font-size:10pt;font-family:monospace;background:#f9f9f9;\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">a numbered list</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">with some numbers</li>\n</ol><div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-orgfff3f56\">\n<h2 style=\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\" id=\"orgfff3f56\">heading 1</h2>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-orgfff3f56\">\n</div>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"outline-container-org66b0f05\">\n<h3 style=\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\" id=\"org66b0f05\">heading 2</h3>\n<div style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\" id=\"text-org66b0f05\">\n<ul style=\"list-style-type:square;\"><li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">some</li>\n<li style=\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\">bullets</li>\n</ul><p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\n\\(x_1 + 1 = 100^2 \\Sigma_0^\\infinity \\alpha\\)\n</p>\n\n<p style=\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>") nil)
  mu4e~proc-filter(#<process  *mu4e-proc*> "\376dc7\377(:compose reply :original (\n\011:docid 38038\n\011:subject \"org-msg test\"\n\011:date (23920 3726 0)\n\011:size 3233\n\011:message-id \"[email protected]\"\n\011:path \"/home/john/.mail/gmail/trash/cur/1567624960.ea3e11fc614b8f59.azazel,U=180:2,S\"\n\011:maildir \"/gmail/trash\"\n\011:priority normal\n\011:flags (seen)\n\011:parts ((:index 1 :name \"1.msgpart\" :mime-type \"text/html\" :type (leaf inline) :attachment nil  :size 2867  ))\n\011:from ((\"John Kehayias\" . \"[email protected]\"))\n\011:to ((\"John Kehayias\" . \"[email protected]\"))\n\011:user-agent \"mu4e 1.3.4; emacs 26.3\"\n\011:body-html \"<html xmlns=\\\"http://www.w3.org/1999/xhtml\\\" lang=\\\"en\\\" xml:lang=\\\"en\\\"><head><!-- 2019-09-04 Wed 15:20 --><meta http-equiv=\\\"Content-Type\\\" content=\\\"text/html;charset=utf-8\\\"/><meta name=\\\"viewport\\\" content=\\\"width=device-width, initial-scale=1\\\"/><meta name=\\\"generator\\\" content=\\\"Org mode\\\"/><meta name=\\\"author\\\" content=\\\"John Kehayias\\\"/></head><body>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"content\\\">\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\nThis is a test of <code style=\\\"font-size:10pt;font-family:monospace;background:#f9f9f9;\\\">org-mode</code>\n</p>\n\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\n<b>bold</b> <i>italic</i> <span class=\\\"underline\\\">underlinedon'twork?</span> <code style=\\\"font-size:10pt;font-family:monospace;background:#f9f9f9;\\\">is this strikethrough?</code> -is this anything-\n</p>\n\n<ol style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:0px;margin-left:30px;padding-top:0px;padding-left:5px;\\\"><li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">a numbered list</li>\n<li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">with some numbers</li>\n</ol><div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"outline-container-orgfff3f56\\\">\n<h2 style=\\\"margin-top:20px;margin-bottom:20px;font-style:italic;color:#0071c5;font-size:13pt;font-family:&quot;Arial&quot;;\\\" id=\\\"orgfff3f56\\\">heading 1</h2>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"text-orgfff3f56\\\">\n</div>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"outline-container-org66b0f05\\\">\n<h3 style=\\\"margin-bottom:0px;text-decoration:underline;color:#0071c5;font-size:12pt;font-family:&quot;Arial&quot;;\\\" id=\\\"org66b0f05\\\">heading 2</h3>\n<div style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:11pt;\\\" id=\\\"text-org66b0f05\\\">\n<ul style=\\\"list-style-type:square;\\\"><li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">some</li>\n<li style=\\\"font-family:&quot;Arial&quot;;font-size:10pt;line-height:10pt;margin-bottom:0px;margin-top:2px;\\\">bullets</li>\n</ul><p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\n\\\\(x_1 + 1 = 100^2 \\\\Sigma_0^\\\\infinity \\\\alpha\\\\)\n</p>\n\n<p style=\\\"text-decoration:none;margin-bottom:0px;margin-top:10px;line-height:11pt;font-size:10pt;font-family:&quot;Arial&quot;;max-width:100ch;\\\">\nthe end!\n</p>\n</div>\n</div>\n</div>\n</div>\n</body></html>\"\n)\n :include nil)\n")

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

from org-msg.

podiki avatar podiki commented on May 31, 2024

Ah right, of course! Same for two lines down with :date, and then no more errors, can reply with the inserted org top matter.

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi John and Thorsten,

It would be nice if you get a chance to test the new experimental branch (I re-wrote the history). I would like to know it works well if if the new header works well including a CC field when necessary. If there are no CC recipients, the CC field should not present in the header.

Regards,

Jeremy
One Emacs to rule them all

from org-msg.

podiki avatar podiki commented on May 31, 2024

Quick test shows a CC when needed only, works for me. Thanks for the quick work @jeremy-compostella, this is a great package (I used it already for a nice looking table from org-mode).

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

Same on my side, seems to work here. CC only appears if it'ts needed. Really a useful package. I'm working on a big project right now and I need to write html mails with lot's of descriptions, numbers and tables. So I test it every day, will report if something goes wrong...

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Thank you for the feedback. I have pushed the experimental branch as the master branch.

from org-msg.

dakra avatar dakra commented on May 31, 2024

@jeremy-compostella I don't have anything to say about the issue but as you asked before why this package is not more popular I think after all those changes you should tag a release and the post it on the r/emacs subreddit. Imho that will give it good exposure. 👍

from org-msg.

thorstengrothe avatar thorstengrothe commented on May 31, 2024

I tested the package for a couple of days now, I got the version from master branch installed.
I can see the package has made great progresses and I like it very much. One thing:

Forwarding messages does not work for me, the message citation body is missing. Can anyone confirm this or is it my fault?

Regards
Thorsten

from org-msg.

jeremy-compostella avatar jeremy-compostella commented on May 31, 2024

Hi Thorsten,

Forwarding messages does not work for me, the message citation body is missing. Can anyone confirm this or is it my fault?

It is not your fault. Forwarding is a difficult case to handle by OrgMsg because it has too many dependencies on how the Mail User Agent wants to handle it. The workaround it to do a reply and then change the recipients.

Regards,

Jeremy

from org-msg.

Related Issues (20)

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.