forgot do
This commit is contained in:
parent
4dfa7f7698
commit
786cddd7b3
1 changed files with 1 additions and 1 deletions
|
@ -250,7 +250,7 @@ associateUserToRole
|
||||||
-> Int -- ^ Role id
|
-> Int -- ^ Role id
|
||||||
-> PGS.Connection
|
-> PGS.Connection
|
||||||
-> Matehandler Int -- ^ Resulting UserToRole id
|
-> Matehandler Int -- ^ Resulting UserToRole id
|
||||||
associateUserToRole uid rid conn =
|
associateUserToRole uid rid conn = do
|
||||||
a <- runInsert_ conn $ Insert
|
a <- runInsert_ conn $ Insert
|
||||||
{ iTable = userToRoleTable
|
{ iTable = userToRoleTable
|
||||||
, iRows =
|
, iRows =
|
||||||
|
|
Loading…
Reference in a new issue