summaryrefslogtreecommitdiff
path: root/Assistant/WebApp.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-08-04 21:18:57 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-08-04 21:18:57 -0400
commit3add2cd3ba560bbda353c4696c8f9d25443d61fe (patch)
treea0ca7021c7288e5f2a9c5fbb039742720211be2c /Assistant/WebApp.hs
parente125ce74b87a86b80f1eead371390ce72c58428b (diff)
wire up scan and transfer to newly added removable drive
remote setup still todo
Diffstat (limited to 'Assistant/WebApp.hs')
-rw-r--r--Assistant/WebApp.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Assistant/WebApp.hs b/Assistant/WebApp.hs
index 4042d410e..cdfab0993 100644
--- a/Assistant/WebApp.hs
+++ b/Assistant/WebApp.hs
@@ -13,6 +13,7 @@ module Assistant.WebApp where
import Assistant.Common
import Assistant.ThreadedMonad
import Assistant.DaemonStatus
+import Assistant.ScanRemotes
import Assistant.TransferQueue
import Assistant.Alert hiding (Widget)
import Utility.NotificationBroadcaster
@@ -32,6 +33,7 @@ mkYesodData "WebApp" $(parseRoutesFile "Assistant/WebApp/routes")
data WebApp = WebApp
{ threadState :: Maybe ThreadState
, daemonStatus :: DaemonStatusHandle
+ , scanRemotes :: ScanRemoteMap
, transferQueue :: TransferQueue
, secretToken :: Text
, relDir :: Maybe FilePath