|
| From: | James Harkins |
| Subject: | Re: [O] HTML export doesn't convert quote before footnote |
| Date: | Sat, 11 Jan 2014 10:45:41 +0800 |
| User-agent: | Trojita/v0.3.96-git; Qt/4.8.1; X11; Linux; Ubuntu 12.04.3 LTS |
On Thursday, January 9, 2014 7:07:15 PM HKT, Nicolas Goaziou wrote:
Hello, James Harkins <address@hidden> writes:On Thursday, January 9, 2014 10:13:32 AM HKT, James Harkins wrote:... That's because BACKEND is already a symbol, not a real back-end (i.e. a defstruct). Thus, you can use: (cdr (assq backend ...) ...)
And, I have a working filter now.
(defun hjh-quote-before-footnote (contents backend info)
"Convert '\"[fn' to the appropriate closing quote per backend."
(when (and (and
(org-export-derived-backend-p backend 'latex 'html)
(plist-get info :with-smart-quotes))
(let ((teststring
(cdr (assq backend
'((latex . "\"\\\\footnote") (html .
"\"<sup><a"))))))
(string-match teststring contents)))
(let* ((replacements '((latex . "''\\\\footnote") (html .
"”<sup><a")))
(replacement (assoc backend replacements)))
(replace-match (cdr replacement) nil nil contents))))
Filters are... really cool. Thanks for the help!
Next up: Try to control image sizes when using beamerarticle...
hjh
| [Prev in Thread] | Current Thread | [Next in Thread] |