1 files changed, 4 insertions, 0 deletions
diff --git a/Main.hs b/Main.hs
index 508fb67..3e64c55 100644
--- a/Main.hs
+++ b/Main.hs
@@ -155,6 +155,10 @@ scanimageArgs st =
 -- other device-specific scanimage options the old script supported:
 -- --swdespeck; --color-filter; --depth
 
+-- TODO include usbreset.c as a cbit, and use FFI to optionally reset
+-- the scanner's USB connection after a scan -- this is needed on some
+-- scanners that I occasionally use
+
 processCommand :: St -> IO ()
 processCommand st = case st^.stScanSess of
   Nothing -> return ()          -- quit sscan