aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2017-03-01 09:40:06 -0700
committerSean Whitton <spwhitton@spwhitton.name>2017-03-01 09:40:06 -0700
commit120161665af41b254acfbb851f83bef83efc5522 (patch)
treeeed594a70b251a47dc6472015cea0341ada26d23
parent59c4c9899802e876ceb4c31095d983048ace8fb1 (diff)
downloadsscan-120161665af41b254acfbb851f83bef83efc5522.tar.gz
TODO
-rw-r--r--Main.hs4
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