aboutsummaryrefslogtreecommitdiff
path: root/src/Chelleport/OCR.hs
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2024-12-25 19:49:10 +0530
committerAkshay Nair <phenax5@gmail.com>2024-12-25 19:49:16 +0530
commitfb24e589290f7ffbee04972eed35fca37facdf1c (patch)
tree49a467cf35f9ac3469164a6134d0a0a3b5b3074a /src/Chelleport/OCR.hs
parent580439bf8dd33e00f6a668a4828eab01d24d7abf (diff)
downloadchelleport-fb24e589290f7ffbee04972eed35fca37facdf1c.tar.gz
chelleport-fb24e589290f7ffbee04972eed35fca37facdf1c.zip
Minor tesseract optimizations
Diffstat (limited to 'src/Chelleport/OCR.hs')
-rw-r--r--src/Chelleport/OCR.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Chelleport/OCR.hs b/src/Chelleport/OCR.hs
index 87cad62..5ee331c 100644
--- a/src/Chelleport/OCR.hs
+++ b/src/Chelleport/OCR.hs
@@ -1,6 +1,7 @@
module Chelleport.OCR (MonadOCR (..)) where
import Chelleport.Types
+import Chelleport.Utils (benchmark)
import Control.Concurrent (threadDelay)
import Control.Monad.IO.Class (MonadIO (liftIO))
import Control.Monad.RWS (MonadReader (ask))
@@ -31,7 +32,6 @@ instance (MonadIO m) => MonadOCR (AppM m) where
pure path
getWordsInImage filePath = liftIO $ do
- print filePath
findWordCoordinates filePath <* removeFile filePath
findWordCoordinates :: String -> IO [OCRMatch]