diff options
Diffstat (limited to 'src/Types.hs')
-rw-r--r-- | src/Types.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Types.hs b/src/Types.hs index f47e1419757a..5026b97383e6 100644 --- a/src/Types.hs +++ b/src/Types.hs @@ -174,8 +174,8 @@ instance FromRow Account where pure Account{..} data Session = Session - { username :: Username - , role :: Role + { sessionUsername :: Username + , sessionRole :: Role } deriving (Eq, Show) instance ToJSON Session where |