@@ -324,7 +324,7 @@ createNewChannel uId req = transactionally_ $ do
324 return $ fmap fromOnly cId
324 return $ fmap fromOnly cId
326updateChannel :: UserId -> NamedChannel UserId -> StaticPQ ()
326updateChannel :: UserId -> NamedChannel UserId -> StaticPQ ()
327−updateChannel uId req = transactionally_ $ do
327+updateChannel uId req = do
328 uIds <- fmap fromList . verifiedUsers . toList $ namedChannelPeopleIds req
328 uIds <- fmap fromList . verifiedUsers . toList $ namedChannelPeopleIds req
329 _ <- getChannelForUser uId $ namedChannelId req
329 _ <- getChannelForUser uId $ namedChannelId req
330 _ <- manipulateParams updateNamedChannelQ $ addUserToChannelUpdate uId (req {namedChannelPeopleIds = uIds})
330 _ <- manipulateParams updateNamedChannelQ $ addUserToChannelUpdate uId (req {namedChannelPeopleIds = uIds})