On Thursday, January 9, 2014 7:07:15 PM HKT, Nicolas Goaziou wrote:
Hello,
James Harkins <jamshar...@gmail.com> 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
