From e604888020626b0fbbd2fc9c0b0b64975e9ad6f3 Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Wed, 1 Mar 2017 07:31:28 -0700
Subject: tidy up more comments

---
 Main.hs        | 8 ++------
 Types/State.hs | 2 --
 2 files changed, 2 insertions(+), 8 deletions(-)

diff --git a/Main.hs b/Main.hs
index a613066..185a91f 100644
--- a/Main.hs
+++ b/Main.hs
@@ -142,6 +142,8 @@ scanimageArgs st =
         Letter -> 279.4
         Photo  -> 100
     ]
+-- other device-specific scanimage options the old script supported:
+-- --swdespeck; --color-filter; --depth
 
 processCommand :: St -> IO ()
 processCommand st = case st^.stScanSess of
@@ -170,9 +172,3 @@ createProcessWait_ :: String -> CreateProcess -> IO ()
 createProcessWait_ s c = do
     (_, _, _, p) <- createProcess_ s c
     void $ waitForProcess p
-
--- TODO scanning should happen in main.  We use withTempDir to setup a
--- session, and then fire up brick again.  add additional state
--- element that is the user's chosen action.  i.e. don't use
--- suspendAndResume which is for getting user input, not running the
--- result of the UI.  Move the whole UI to a module
diff --git a/Types/State.hs b/Types/State.hs
index 02ff6a2..f49ee31 100644
--- a/Types/State.hs
+++ b/Types/State.hs
@@ -95,8 +95,6 @@ data St =
        , _stOutFormat    :: OutputFormat
        , _stOutdir       :: FilePath -- ^ where to save final PDFs
        }
--- other device-specific scanimage options the old script supported:
--- --swdespeck; --color-filter; --depth
 
 makeLenses ''St
 
-- 
cgit v1.2.3