aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Main.hs b/Main.hs
index 09b6779..47b6b18 100644
--- a/Main.hs
+++ b/Main.hs
@@ -74,7 +74,7 @@ processScanSessDir st dir = withCurrentDirectory dir $ do
-- 4. qpdf (ocrmypdf invokes qpdf but it doesn't use
-- --linearize, which shrinks the PDF, often substantially)
void $ createProcessWait_ "qpdf"
- (proc "qpdf" ["--linearize", "temp.pdf"])
+ (proc "qpdf" ["--linearize", "temp.pdf", "-"])
{ std_in = NoStream
, std_out = UseHandle outH
, std_err = UseHandle logH