From 749ea7dc9e8d6d85c2d05a16e881b948d8c74ee9 Mon Sep 17 00:00:00 2001
From: Alan Schmitt <alan.schmitt@polytechnique.org>
Date: Wed, 13 Jan 2016 16:03:40 +0100
Subject: [PATCH] ox-latex: Add option support to custom environment

* lisp/ox-latex.el (org-latex-src-block): make the options from
  attr_latex available to the custom environment using %o.
---
 lisp/ox-latex.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index a57677b..7f889d7 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1034,13 +1034,14 @@ exported.  This format string may contain these elements:
   %c for the caption
   %f for the float attribute
   %l for an appropriate label 
+  %o for the LaTeX attributes
 
 For example,
 
   (setq org-latex-custom-lang-environments
      '((python \"pythoncode\")
        (ocaml \"\\\\begin{listing}
-\\\\begin{minted}{ocaml}
+\\\\begin{minted}[%o]{ocaml}
 %s\\\\end{minted}
 \\\\caption{%c}
 \\\\label{%l}\")))
@@ -1056,7 +1057,7 @@ and if Org encounters an Ocaml source block during LaTeX export it
 will produce
 
   \\begin{listing}
-  \\begin{minted}{ocaml}
+  \\begin{minted}[<attr_latex options>]{ocaml}
   <src block body>
   \\end{minted}
   \\caption{<caption>}
@@ -2802,7 +2803,8 @@ contextual information."
 			 `((?s . ,formatted-src)
 			   (?c . ,caption)
 			   (?f . ,float)
-			   (?l . ,(org-latex--label src-block info)))))))
+			   (?l . ,(org-latex--label src-block info))
+			   (?o . ,(or (plist-get attributes :options) "")))))))
        ;; Case 3.  Use minted package.
        ((eq listings 'minted)
 	(let* ((caption-str (org-latex--caption/label-string src-block info))
-- 
2.7.0