* [PATCH] Add an attribute to the new LaTeX exporter
@ 2013-01-09 0:22 Thomas S. Dye
2013-01-09 15:09 ` Nicolas Goaziou
0 siblings, 1 reply; 2+ messages in thread
From: Thomas S. Dye @ 2013-01-09 0:22 UTC (permalink / raw
To: Org-mode
[-- Attachment #1: Type: text/plain, Size: 512 bytes --]
Aloha all,
A journal is asking for a section of figure legends created like this:
\section*{Figure Legends}
\begin{figure}[!ht]
\begin{center}
%\includegraphics[width=4in]{figure_name.2.eps}
\end{center}
\caption{
{\bf Bold the first sentence.} Rest of figure 2 caption. Caption
should be left justified, as specified by the options to the caption
package.
}
\label{Figure_label}
\end{figure}
The attached patch introduces an attribute to toggle commenting the
\includegraphics call.
All the best,
Tom
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Patch for new LaTeX exporter --]
[-- Type: text/x-patch, Size: 3397 bytes --]
From b1eeaf68296e765b5653e77ca0533b2f21808473 Mon Sep 17 00:00:00 2001
From: Thomas Dye <tsd@tsdye.com>
Date: Tue, 8 Jan 2013 14:04:14 -1000
Subject: [PATCH] New LaTeX exporter: Added an attribute
* contrib/lisp/org-e-latex.el: Added an attribute, :comment-include,
to toggle commenting the \includegraphics call.
Journals sometimes ask for a list of figure captions.
---
contrib/lisp/org-e-latex.el | 32 +++++++++++++++++++-------------
1 file changed, 19 insertions(+), 13 deletions(-)
diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el
index 7987369..79ae355 100644
--- a/contrib/lisp/org-e-latex.el
+++ b/contrib/lisp/org-e-latex.el
@@ -74,13 +74,15 @@
;; (i.e. "inparaenum"). The second one allows to specify optional
;; arguments for that environment (square brackets are not mandatory).
;;
-;; Images accept `:float', `:placement' and `:options' as attributes.
-;; `:float' accepts a symbol among `wrap', `multicolumn', and
-;; `figure', which defines the float environment for the table (if
-;; unspecified, an image with a caption will be set in a "figure"
-;; environment). `:placement' is a string that will be used as
-;; argument for the environment chosen. `:options' is a string that
-;; will be used as the optional argument for "includegraphics" macro.
+;; Images accept `:float', `:placement', `:comment-include', and
+;; `:options' as attributes. `:float' accepts a symbol among `wrap',
+;; `multicolumn', and `figure', which defines the float environment
+;; for the table (if unspecified, an image with a caption will be set
+;; in a "figure" environment). `:comment-include' is a boolean that
+;; toggles whether to comment out the \includegraphics
+;; call. `:placement' is a string that will be used as argument for
+;; the environment chosen. `:options' is a string that will be used
+;; as the optional argument for "includegraphics" macro.
;;
;; This back-end also offers enhanced support for footnotes. Thus, it
;; handles nested footnotes, footnotes in tables and footnotes in item
@@ -1745,6 +1747,10 @@ used as a communication channel."
((eq float 'figure)
(format "[%s]" org-e-latex-default-figure-position))
(t ""))))
+ (comment-include
+ (let ((cmt-inc (plist-get attr :comment-include)))
+ (cond (cmt-inc "%")
+ (t ""))))
;; Options for "includegraphics" macro. Make sure it is
;; a string with square brackets when non empty. Default to
;; `org-e-latex-image-default-option' when possible.
@@ -1760,16 +1766,16 @@ used as a communication channel."
(case float
(wrap (format "\\begin{wrapfigure}%s
\\centering
-\\includegraphics%s{%s}
-%s\\end{wrapfigure}" placement options path caption))
+%s\\includegraphics%s{%s}
+%s\\end{wrapfigure}" placement comment-include options path caption))
(multicolumn (format "\\begin{figure*}%s
\\centering
-\\includegraphics%s{%s}
-%s\\end{figure*}" placement options path caption))
+%s\\includegraphics%s{%s}
+%s\\end{figure*}" placement comment-include options path caption))
(figure (format "\\begin{figure}%s
\\centering
-\\includegraphics%s{%s}
-%s\\end{figure}" placement options path caption))
+%s\\includegraphics%s{%s}
+%s\\end{figure}" placement comment-include options path caption))
(t (format "\\includegraphics%s{%s}" options path)))))
(defun org-e-latex-link (link desc info)
--
1.8.0.2
[-- Attachment #3: Type: text/plain, Size: 147 bytes --]
--
T.S. Dye & Colleagues, Archaeologists
735 Bishop St, Suite 315, Honolulu, HI 96813
Tel: 808-529-0866, Fax: 808-529-0884
http://www.tsdye.com
^ permalink raw reply related [flat|nested] 2+ messages in thread
* Re: [PATCH] Add an attribute to the new LaTeX exporter
2013-01-09 0:22 [PATCH] Add an attribute to the new LaTeX exporter Thomas S. Dye
@ 2013-01-09 15:09 ` Nicolas Goaziou
0 siblings, 0 replies; 2+ messages in thread
From: Nicolas Goaziou @ 2013-01-09 15:09 UTC (permalink / raw
To: Thomas S. Dye; +Cc: Org-mode
Hello,
tsd@tsdye.com (Thomas S. Dye) writes:
> A journal is asking for a section of figure legends created like this:
>
> \section*{Figure Legends}
> \begin{figure}[!ht]
> \begin{center}
> %\includegraphics[width=4in]{figure_name.2.eps}
> \end{center}
> \caption{
> {\bf Bold the first sentence.} Rest of figure 2 caption. Caption
> should be left justified, as specified by the options to the caption
> package.
> }
> \label{Figure_label}
> \end{figure}
>
> The attached patch introduces an attribute to toggle commenting the
> \includegraphics call.
Applied (with a minor stylistic change). Thank you.
Regards,
--
Nicolas Goaziou
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2013-01-09 15:13 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-01-09 0:22 [PATCH] Add an attribute to the new LaTeX exporter Thomas S. Dye
2013-01-09 15:09 ` Nicolas Goaziou
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.