From 6ab52f53967d24e1a40c2c66a7932adcd99af80f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Galland?= <galland@arakhne.org>
Date: Mon, 29 Jun 2015 21:38:00 +0200
Subject: [PATCH] [translators] Add the TikZ to PDF translator.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

see #92

Signed-off-by: Stéphane Galland <galland@arakhne.org>
---
 VERSION                       |  2 +-
 pm/AutoLaTeX/Core/Util.pm     |  2 +-
 translators/tikz2pdf.transdef | 57 +++++++++++++++++++++++++++++++++++
 3 files changed, 59 insertions(+), 2 deletions(-)
 create mode 100644 translators/tikz2pdf.transdef

diff --git a/VERSION b/VERSION
index 5265703..90138d7 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-autolatex 35.1
+autolatex 36.0
diff --git a/pm/AutoLaTeX/Core/Util.pm b/pm/AutoLaTeX/Core/Util.pm
index bf9804c..02095f7 100644
--- a/pm/AutoLaTeX/Core/Util.pm
+++ b/pm/AutoLaTeX/Core/Util.pm
@@ -38,7 +38,7 @@ package AutoLaTeX::Core::Util;
 
 our $INTERNAL_MESSAGE_PREFIX = '';
 
-our $VERSION = '35.1';
+our $VERSION = '36.0';
 
 @ISA = ('Exporter');
 @EXPORT = qw( &isHash &isArray &removeFromArray &arrayContains &getAutoLaTeXDir
diff --git a/translators/tikz2pdf.transdef b/translators/tikz2pdf.transdef
new file mode 100644
index 0000000..d1d46c8
--- /dev/null
+++ b/translators/tikz2pdf.transdef
@@ -0,0 +1,57 @@
+# autolatex - tikz2pdf.transdef
+# Copyright (C) 2015  Stephane Galland <galland@arakhne.org>
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; see the file COPYING.  If not, write to
+# the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+# Boston, MA 02111-1307, USA.
+
+#--------------------------------------------
+# See template.txt for details on the fields
+#--------------------------------------------
+
+INPUT_EXTENSIONS = .tikz
+
+OUTPUT_EXTENSIONS for pdf = .pdf
+OUTPUT_EXTENSIONS for eps = .eps
+
+TRANSLATOR_FUNCTION =<<EOL {
+	my $basename = basename("$in", @inexts);
+	my $text = join(" ",
+		"\\documentclass{standalone}",
+		"\\usepackage{pgfplots}",
+		"\\usepackage{amsmath}",
+		"\\usepackage{tikz}",
+		"\\newlength\\figurewidth",
+		"\\newlength\\figureheight",
+		"\\setlength\\figurewidth{50em}",
+		"\\setlength\\figureheight{50em}",
+		"\\begin{document}",
+		"\\input{$in}",
+		"\\end{document}");
+	if ($ispdfmode) {
+		runCommandOrFail(
+			'pdflatex', '-shell-escape', '-halt-on-error',
+			'-jobname', "$basename", "$text" );
+	}
+	else {
+		runCommandOrFail(
+			'latex', '-shell-escape', '-halt-on-error',
+			'-jobname', "$basename", "$text" );
+	}
+	unlink(File::Spec->catfile(dirname($in), $basename.".aux"));
+	unlink(File::Spec->catfile(dirname($in), $basename.".log"));
+}
+
+EOL
+