more
This commit is contained in:
parent
d0cdba9c1e
commit
a622c76bbd
|
@ -3,8 +3,7 @@ open Pdfutil
|
||||||
let emptypage = Pdfpage.blankpage Pdfpaper.a4
|
let emptypage = Pdfpage.blankpage Pdfpaper.a4
|
||||||
|
|
||||||
let error s =
|
let error s =
|
||||||
Pdfe.log (s ^ "\nUse -help for help.\n");
|
raise (Pdf.PDFError s)
|
||||||
exit 2
|
|
||||||
|
|
||||||
(* Unit conversions to points. *)
|
(* Unit conversions to points. *)
|
||||||
let mm x = ((x /. 10.) /. 2.54) *. 72.
|
let mm x = ((x /. 10.) /. 2.54) *. 72.
|
||||||
|
|
Loading…
Reference in New Issue