finished pushing Assistant monad into all relevant files

All temporary and old functions are removed.
2012-10-30 17:14:26 -04:00 · 2012-10-30 17:14:26 -04:00 · 93ffd47d76
commit 93ffd47d76
parent 47d94eb9a4
26 changed files with 262 additions and 301 deletions
--- a/Assistant/WebApp/Configurators/Edit.hs
+++ b/Assistant/WebApp/Configurators/Edit.hs
@ -77,7 +77,7 @@ setRepoConfig uuid mremote oldc newc = do
 				, Param name
 				]
 			void $ Remote.remoteListRefresh
-		runAssistantY updateSyncRemotes
+		liftAssistant updateSyncRemotes

 editRepositoryAForm :: RepoConfig -> AForm WebApp WebApp RepoConfig
 editRepositoryAForm def = RepoConfig