aboutsummaryrefslogtreecommitdiffhomepage
path: root/Types
diff options
context:
space:
mode:
Diffstat (limited to 'Types')
-rw-r--r--Types/State.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Types/State.hs b/Types/State.hs
index befba24..e37d7a8 100644
--- a/Types/State.hs
+++ b/Types/State.hs
@@ -38,6 +38,9 @@ data St =
St { _stScanningSession :: Maybe FilePath -- ^ if a session is in
-- progress, accmulate
-- scans in this dir
+ , _stPageCount :: Maybe Int -- ^ if a session is in
+ -- progress, the number of
+ -- pages scanned thus far
, _stOCR :: Bool -- ^ whether to use OCRmyPDF
, _stColour :: Colour
, _stPaper :: Paper -- ^ currently selected paper size