diff --git a/src/Owner.hs b/src/Owner.hs index d7b1fa0..bda88ec 100644 --- a/src/Owner.hs +++ b/src/Owner.hs @@ -351,7 +351,7 @@ upsertProSession ps = do upsert (select ["address" =: psaddress ps, "expiration" =: psexpiration ps] - "owners") + "prosessions") d _ -> return ()