diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Sessions.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Sessions.hs b/src/Sessions.hs index b03de6eee6b4..19099fe2ef96 100644 --- a/src/Sessions.hs +++ b/src/Sessions.hs @@ -20,7 +20,7 @@ isValid session = do -- | Lookup the session by UUID. get :: FilePath -> T.SessionUUID -> IO (Maybe T.StoredSession) get dbFile uuid = withConnection dbFile $ \conn -> do - res <- query conn "SELECT * FROM Session WHERE uuid = ?" (Only uuid) + res <- query conn "SELECT * FROM Sessions WHERE uuid = ?" (Only uuid) case res of [x] -> pure (Just x) _ -> pure Nothing |