Re: Filter not working (org 8.0.3)

[Nicolas Goaziou <n.goaziou@gmail.com>]

Hello,

Roger Mason <rmason@mun.ca> writes:

> I have this at the top of an org file in order to put graphics in the 
> margin:
>
> #+LATEX_HEADER: \usepackage[right=2in,left=0.5in]{geometry} 
> \usepackage{parskip}
>
> #+BEGIN_SRC emacs-lisp
> (defun margin-graphics (contents backend info)
>    (when (eq backend 'latex)
>      (replace-regexp-in-string "\\`\\\\includegraphics.+\\({.+}\\)"
> "\\\\marginpar{\\\\includegraphics[width=0.9\\\\marginparwidth]\\1} " 
> contents)))
>
> (add-to-list 'org-export-filter-link-functions 'margin-graphics)
> #+END_SRC
>
> C-e lp produces a pdf document, but the filter is not applied (org 8.0.3).
>
> Can someone show me what I'm doing wrong?

I think you need to tell Babel to actually execute the code (e.g.
with :exports both). You may also want to make
`org-export-filter-link-functions' local to the buffer, too.


Regards,

-- 
Nicolas Goaziou