@@ -87,11 +87,11 @@ preview configuration rules port = do
8787 ruleSet <- run configuration rules
8888
8989 -- Get the resource list and a callback for the preview poll
90− let resources = rulesResources ruleSet
90+ let resources' = rulesResources ruleSet
9191 callback = build configuration rules
9292
9393 -- Fork a thread polling for changes
94− _ <- forkIO $ previewPoll configuration resources callback
94+ _ <- forkIO $ previewPoll configuration resources' callback
9595
9696 -- Run the server in the main thread
9797 server configuration port