From: Ævar Arnfjörð Bjarmason Date: Tue, 3 May 2005 08:17:21 +0000 (+0000) Subject: * Comments to help potential hackers. X-Git-Tag: 1.5.0alpha1~3 X-Git-Url: http://git.cyclocoop.org/%7B%24www_url%7Dadmin/compta/operations/recherche.php?a=commitdiff_plain;h=0be78688326fd651b699eb7e6395584a1fa56660;p=lhc%2Fweb%2Fwiklou.git * Comments to help potential hackers. --- 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");