@@ -26,8 +26,8 @@ main = launchAff' do
2626 log $ maybe "not found" id val
2727
2828
29−onUpgradeNeeded :: forall e. Database -> Transaction -> Eff (idb :: IDB, exception :: EXCEPTION | e) Unit
30−onUpgradeNeeded db _ = launchAff' do
29+onUpgradeNeeded :: forall e. Database -> Transaction -> { oldVersion :: Int } -> Eff (idb :: IDB, exception :: EXCEPTION | e) Unit
30+onUpgradeNeeded db _ _ = launchAff' do
3131 store <- IDBDatabase.createObjectStore db "store" IDBObjectStore.defaultParameters
3232 _ <- IDBObjectStore.add store "patate" (Just 1)
3333 _ <- IDBObjectStore.add store { property: 42 } (Just 2)
@@ -51,6 +51,10 @@ one.
5151
5252## Changelog
5353
54+#### v3.0.0
55+
56+- callback to `onUpgradeNeeded` event now provide a record with the database old version.
57+
5458#### v2.0.0
5559
5660- review interface implementation (use of opaque classes to improve readability without compromising