From 3fcd64332e4b507926ae0401cb29396b8bf49939 Mon Sep 17 00:00:00 2001 From: John Whitington Date: Tue, 26 Oct 2021 17:00:14 +0100 Subject: [PATCH] more --- cpdf.ml | 3 --- 1 file changed, 3 deletions(-) diff --git a/cpdf.ml b/cpdf.ml index 5671568..112d80d 100644 --- a/cpdf.ml +++ b/cpdf.ml @@ -3079,17 +3079,14 @@ let twoup fast pdf = let endpage = Pdfpage.endpage pdf in let all = ilist 1 endpage in let pdf = scale_pdf ~fast (many (sc, sc) endpage) pdf all in - Pdfwrite.pdf_to_file pdf "debug/scaled.pdf"; let pdf = impose ~x:2. ~y:1. ~fit:false ~columns:false ~rtl:false ~btt:false ~center:true ~margin:0. ~spacing:0. ~linewidth:0. ~fast pdf in - Pdfwrite.pdf_to_file pdf "debug/imposed.pdf"; let endpage = Pdfpage.endpage pdf in let all = ilist 1 endpage in let pdf = upright all (rotate_pdf ~-90 pdf all) in - Pdfwrite.pdf_to_file pdf "debug/uprighted.pdf"; scale_to_fit_pdf ~fast Cpdfposition.Diagonal 1. (many (width, height) endpage) () pdf all (* \section{Output info} *)