@@ -159,8 +159,8 @@ ob = \case
159159 let dotGhci = unlines
160160 [ ":set args --quiet --port " <> show freePort
161161 , ":set -i" <> intercalate ":" (mconcat hsSrcDirs)
162− , ":add Backend.App Frontend.App"
163− , ":module + Control.Concurrent Obelisk.Widget.Run Frontend.App Backend.App"
162+ , ":add Backend Frontend"
163+ , ":module + Control.Concurrent Obelisk.Widget.Run Frontend Backend"
164164 ]
165165 testCmd = unlines
166166 [ "backendId <- forkIO backend"