add begin/end{preview} to tex output

[coq-hetmet.git] / examples / GArrowTikZ.hs

diff --git a/examples/GArrowTikZ.hs b/examples/GArrowTikZ.hs
index 54c31ee..6ebaded 100644 (file)
--- a/examples/GArrowTikZ.hs
+++ b/examples/GArrowTikZ.hs
@@ -341,9 +341,11 @@ tikz example
           putStrLn "\\usepackage[tightpage,active]{preview}"
           putStrLn "\\begin{document}"
           putStrLn "\\setlength\\PreviewBorder{5pt}"
+          putStrLn "\\begin{preview}"
           putStrLn $ "\\begin{tikzpicture}[every on chain/.style={join=by ->},yscale=-1]"
           putStrLn (toTikZ example)
           putStrLn "\\end{tikzpicture}"
+          putStrLn "\\end{preview}"
           --putStrLn "\\pagebreak"
           --putStrLn "\\begin{align*}"
           --putStr   (toTikZ' example)