From 69ece105e8dd278e33f85841947fe5f263bd7437 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 12 Mar 2017 16:05:51 -0700 Subject: comment about --remove-background --- Main.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Main.hs b/Main.hs index 67367e2..559defa 100644 --- a/Main.hs +++ b/Main.hs @@ -70,6 +70,9 @@ processScanSessDir st dir = withCurrentDirectory dir $ do -- to output to stdout void $ withFile "temp.pdf" WriteMode $ \tempFile -> do (_, _, Just herr, p) <- createProcess_ "OCRmyPDF" + -- we'd like to use --remove-background here, but then + -- qpdf says that ocrmypdf's output is damaged. + -- reported upstream (proc "ocrmypdf" ["-c", "-i", "-r", "temp2.pdf", "-"]) { std_in = NoStream , std_out = UseHandle tempFile -- cgit v1.2.3