From: Peter Davis <pfd@pfdstudio.com>
To: Nick Dokos <ndokos@gmail.com>
Cc: emacs-orgmode@gnu.org
Subject: Re: Can't email multipart/alternative anymore
Date: Fri, 23 Oct 2015 08:05:15 -0400 [thread overview]
Message-ID: <6sw6c7io5xg58k.fsf@pfdstudio.com> (raw)
Nick Dokos <ndokos@gmail.com> writes:
> Peter Davis <pfd@pfdstudio.com> writes:
>
>> I just tried running org-mime-org-buffer-htmlize, which I have used
>> successfully in the past. However, this time, I got an empty
>> message buffer, and this in the mini-buffer:
>>
>> org-export-barf-if-invalid-backend: Unknown "nil" back-end: Aborting export
>>
>> Any clues? I haven't used this in a couple of months, but it did work
>> at one time and, as far as I know, I haven't changed anything
>> that should impact this.
>>
>
> Works here: Org-mode version 8.3.2 (release_8.3.2-178-g96681f @
> /home/nick/elisp/org-mode/lisp/)
Thanks, Nick. From the error, I'm guessing either a variable that's supposed to point to the backend got unset, or the backend
itself is missing.
> Maybe set debug-on-error and try again - send the backtrace if
> you get one. Or maybe try with -q, load a minimal .emacs with
> org and org-mime and try that.
Here's the output from toggling debug-on-error:
Debugger entered--Lisp error: (error "Unknown \"nil\" back-end: Aborting export")
signal(error ("Unknown \"nil\" back-end: Aborting export"))
error("Unknown \"%s\" back-end: Aborting export" nil)
org-export-barf-if-invalid-backend(nil)
org-export-as(org nil nil t nil)
org-export-string-as("#+STARTUP: showeverything logdone\n#+options: toc:nil num:nil\n#+title: Org Mime Org Buffer HTMLize test\n\n* Intro\n\nHere's a simple graph:\n\n#+BEGIN_SRC dot :file org-test.png :cmdline -Kdot -Tpng\ndigraph G {\n rankdir=LR;\n node [shape=box];\n A -> B;\n B -> C;\n C -> A;\n}\n#+END_SRC\n\nWeill org-mime-org-buffer-htmlize automatically include the image?" org t)
(org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body (if (eq fmt (quote html)) (quote org) (quote ascii)))) (if (eq fmt (quote html)) (quote org) (quote ascii)) t) html)
(insert (org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body (if (eq fmt (quote html)) (quote org) (quote ascii)))) (if (eq fmt (quote html)) (quote org) (quote ascii)) t) html) (mapconcat (quote identity) images "\n"))
(let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as (funcall bhook body (quote html)) (quote html) t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body (if (eq fmt ...) (quote org) (quote ascii)))) (if (eq fmt (quote html)) (quote org) (quote ascii)) t) html) (mapconcat (quote identity) images "\n")))
(cond ((eq fmt (quote org)) (require (quote ox-org)) (insert (org-export-string-as (org-babel-trim (funcall bhook body (quote org))) (quote org) t))) ((eq fmt (quote ascii)) (require (quote ox-ascii)) (insert (org-export-string-as (concat "#+Title:\n" (funcall bhook body (quote ascii))) (quote ascii) t))) ((or (eq fmt (quote html)) (eq fmt (quote html-ascii))) (require (quote ox-ascii)) (require (quote ox-org)) (let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as (funcall bhook body ...) (quote html) t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim (funcall bhook body ...)) (if (eq fmt ...) (quote org) (quote ascii)) t) html) (mapconcat (quote identity) images "\n")))))
(let ((bhook (function (lambda (body fmt) (let ((hook ...)) (if (> ... 0) (let ... ...) body))))) (fmt (if (symbolp fmt) fmt (intern fmt)))) (cond ((eq fmt (quote org)) (require (quote ox-org)) (insert (org-export-string-as (org-babel-trim (funcall bhook body (quote org))) (quote org) t))) ((eq fmt (quote ascii)) (require (quote ox-ascii)) (insert (org-export-string-as (concat "#+Title:\n" (funcall bhook body (quote ascii))) (quote ascii) t))) ((or (eq fmt (quote html)) (eq fmt (quote html-ascii))) (require (quote ox-ascii)) (require (quote ox-org)) (let* ((org-link-file-path-type (quote absolute)) (org-export-htmlize-output-type (quote inline-css)) (html-and-images (org-mime-replace-images (org-export-string-as ... ... t) file)) (images (cdr html-and-images)) (html (org-mime-apply-html-hook (car html-and-images)))) (insert (org-mime-multipart (org-export-string-as (org-babel-trim ...) (if ... ... ...) t) html) (mapconcat (quote identity) images "\n"))))))
org-mime-compose(#("#+STARTUP: showeverything logdone\n#+options: toc:nil num:nil\n#+title: Org Mime Org Buffer HTMLize test\n\n* Intro\n\nHere's a simple graph:\n\n#+BEGIN_SRC dot :file org-test.png :cmdline -Kdot -Tpng\ndigraph G {\n rankdir=LR;\n node [shape=box];\n A -> B;\n B -> C;\n C -> A;\n}\n#+END_SRC\n\nWeill org-mime-org-buffer-htmlize automatically include the image?\n\n" 0 33 (fontified t font-lock-fontified t face org-meta-line) 33 34 (fontified t) 34 60 (fontified t font-lock-fontified t face org-meta-line) 60 61 (fontified t) 61 69 (fontified t font-lock-fontified t face org-document-info-keyword) 69 70 (fontified t) 70 102 (fontified t font-lock-fontified t face org-document-title) 102 103 (fontified t font-lock-fontified t face org-document-title) 103 104 (fontified t font-lock-fontified t) 104 106 (fontified t font-lock-fontified t face org-level-1) 106 111 (fontified t font-lock-fontified t face org-level-1) 111 112 (fontified t font-lock-fontified t) 112 113 (fontified t font-lock-fontified t) 113 135 (fontified t font-lock-fontified t) 135 136 (fontified t font-lock-fontified t) 136 137 (fontified t) 137 193 (font-lock-fontified t org-category "details-2015-10" fontified t font-lock-multiline t face org-block-begin-line) 193 270 (font-lock-fontified t org-category "details-2015-10" fontified t font-lock-multiline t face org-block) 270 271 (font-lock-fontified t org-category "details-2015-10" fontified t font-lock-multiline t face org-block) 271 280 (font-lock-fontified t org-category "details-2015-10" fontified t font-lock-multiline t face org-block-end-line) 280 281 (org-category "details-2015-10" fontified t rear-nonsticky t face org-block-end-line) 281 282 (fontified t) 282 349 (fontified t) 349 350 (fontified t)) html "/Users/davisp/Dropbox/HMH/test.org" nil "test")
(let* ((region-p (org-region-active-p)) (file (buffer-file-name (current-buffer))) (subject (if (not file) (buffer-name (buffer-base-buffer)) (file-name-sans-extension (file-name-nondirectory file)))) (body-start (or (and region-p (region-beginning)) (save-excursion (goto-char (point-min))))) (body-end (or (and region-p (region-end)) (point-max))) (temp-body-file (make-temp-file "org-mime-export")) (body (buffer-substring body-start body-end))) (org-mime-compose body (or fmt (quote org)) file nil subject))
org-mime-send-buffer(html)
org-mime-org-buffer-htmlize()
call-interactively(org-mime-org-buffer-htmlize record nil)
command-execute(org-mime-org-buffer-htmlize record)
execute-extended-command(nil "org-mime-org-buffer-htmlize")
call-interactively(execute-extended-command nil nil)
command-execute(execute-extended-command)
next reply other threads:[~2015-10-23 12:05 UTC|newest]
Thread overview: 15+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-10-23 12:05 Peter Davis [this message]
2015-10-23 13:05 ` Can't email multipart/alternative anymore Aaron Ecay
2015-10-23 20:44 ` Nicolas Goaziou
2015-10-23 20:57 ` Peter Davis
2015-10-24 12:07 ` Nicolas Goaziou
2015-10-24 13:28 ` Peter Davis
2015-10-24 14:28 ` Nicolas Goaziou
2015-10-28 14:11 ` Peter Davis
2015-10-27 15:15 ` Aaron Ecay
-- strict thread matches above, loose matches on Subject: below --
2015-10-28 15:23 Peter Davis
2015-10-23 13:22 Peter Davis
2015-10-23 11:55 Peter Davis
2015-10-22 19:19 Peter Davis
2015-10-22 21:19 ` Rasmus
2015-10-22 21:20 ` Nick Dokos
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=6sw6c7io5xg58k.fsf@pfdstudio.com \
--to=pfd@pfdstudio.com \
--cc=emacs-orgmode@gnu.org \
--cc=ndokos@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).