From 0be78688326fd651b699eb7e6395584a1fa56660 Mon Sep 17 00:00:00 2001 From: =?utf8?q?=C3=86var=20Arnfj=C3=B6r=C3=B0=20Bjarmason?= Date: Tue, 3 May 2005 08:17:21 +0000 Subject: [PATCH] * Comments to help potential hackers. --- math/render.ml | 2 ++ 1 file changed, 2 insertions(+) diff --git a/math/render.ml b/math/render.ml index edd5984abd..f070a91eb4 100644 --- a/math/render.ml +++ b/math/render.ml @@ -1,5 +1,6 @@ let cmd_dvips tmpprefix = "dvips -R -E " ^ tmpprefix ^ ".dvi -f >" ^ tmpprefix ^ ".ps" let cmd_latex tmpprefix = "latex " ^ tmpprefix ^ ".tex >/dev/null" +(* Putting -transparent white in converts arguments will sort-of give you transperancy *) let cmd_convert tmpprefix finalpath = "convert -quality 100 -density 120 " ^ tmpprefix ^ ".ps " ^ finalpath ^ " >/dev/null 2>/dev/null" exception ExternalCommandFailure of string @@ -9,6 +10,7 @@ let render tmppath finalpath outtex md5 = let tmpprefix = (tmppath^"/"^tmpprefix0) in let unlink_all () = begin + (* Commenting this block out will aid in debugging *) Sys.remove (tmpprefix ^ ".dvi"); Sys.remove (tmpprefix ^ ".aux"); Sys.remove (tmpprefix ^ ".log"); -- 2.20.1