@reventlessdev/online-shop-aggregates-catalog 3.0.0-alpha.237 → 3.0.0-alpha.239

package/CHANGELOG.md

@@ -3,6 +3,22 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 3.0.0-alpha.239 (2026-09-11)
+
+**Note:** Version bump only for package @reventlessdev/online-shop-aggregates-catalog
+
+
+
+
+
+# 3.0.0-alpha.238 (2026-09-09)
+
+**Note:** Version bump only for package @reventlessdev/online-shop-aggregates-catalog
+
+
+
+
+
 # 3.0.0-alpha.237 (2026-09-08)
 
 **Note:** Version bump only for package @reventlessdev/online-shop-aggregates-catalog

package/lib/bs/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1788869294227)
-#Done(1788869299890)
+#Start(1789087727040)
+#Done(1789087733109)

package/lib/bs/compiler-info.json

@@ -4,5 +4,5 @@
   "bsc_hash": "75e3a59c95cc953608fd3dd6ea6ed68141bba4414a20a52f114261b8a48385fa",
   "rescript_config_hash": "50d5358a2cbe328e82ae9b442e4615b86dbfe6b2ce05e9eca04a0c78da0e4708",
   "runtime_path": "/home/runner/work/reventless-core/reventless-core/node_modules/@rescript/runtime",
-  "generated_at": "1788869299892"
+  "generated_at": "1789087733117"
 }

package/lib/bs/src/Category/ReadModel/Categories.res

@@ -8,4 +8,3 @@ type state = {
   name: string,
   archived: bool,
 }
-

package/lib/bs/src/ExtensionPoint/Products_ExtensionPointMapping.res

@@ -6,14 +6,21 @@ module Delegate = Product
 
 let mapIncomingCommand = (_id, _command, _meta) => []
 
-let mapOutgoingEvent = Some((id, event, _meta, _queryEngine) =>
-  switch event {
-  | Product.Added({name, price}) => [
-      PublishEvent(id, CatalogSpec.Products_ExtensionPoint.ProductBecameAvailable({productId: id, name, price})),
-    ]
-  | Product.PriceUpdated({price}) => [
-      PublishEvent(id, CatalogSpec.Products_ExtensionPoint.ProductPriceChanged({productId: id, price})),
-    ]
-  | _ => []
-  }
+let mapOutgoingEvent = Some(
+  (id, event, _meta, _queryEngine) =>
+    switch event {
+    | Product.Added({name, price}) => [
+        PublishEvent(
+          id,
+          CatalogSpec.Products_ExtensionPoint.ProductBecameAvailable({productId: id, name, price}),
+        ),
+      ]
+    | Product.PriceUpdated({price}) => [
+        PublishEvent(
+          id,
+          CatalogSpec.Products_ExtensionPoint.ProductPriceChanged({productId: id, price}),
+        ),
+      ]
+    | _ => []
+    },
 )

package/lib/bs/src/LifecycleModel.res

@@ -6,5 +6,4 @@
 // `@transition` annotation where it says anything, and falls back to the
 // annotation where it is silent.
 
-let model: array<Reventless.Plugin.derivedEdge> = [
-]
+let model: array<Reventless.Plugin.derivedEdge> = []

package/lib/bs/src/Plugin.res

@@ -22,7 +22,10 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
 
   // ReadModels
   module CategoriesReadModel = Platform.ReadModel.Make(Categories, Categories_Projections)
-  module ProductDemandsReadModel = Platform.ReadModel.Make(ProductDemands, ProductDemands_Projections)
+  module ProductDemandsReadModel = Platform.ReadModel.Make(
+    ProductDemands,
+    ProductDemands_Projections,
+  )
   module ProductsReadModel = Platform.ReadModel.Make(Products, Products_Projections)
 
   // Tasks
@@ -36,11 +39,26 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
 
   let pluginStructure = Platform.Plugin.makePluginDefinition(
     ~name="Catalog",
-    ~aggregates=[module(CategoryAggregate), module(ProductAggregate), module(ProductDemandAggregate)],
-    ~readModels=[module(CategoriesReadModel), module(ProductDemandsReadModel), module(ProductsReadModel)],
+    ~aggregates=[
+      module(CategoryAggregate),
+      module(ProductAggregate),
+      module(ProductDemandAggregate),
+    ],
+    ~readModels=[
+      module(CategoriesReadModel),
+      module(ProductDemandsReadModel),
+      module(ProductsReadModel),
+    ],
     ~extensions=[module(Orders_Extension)],
     ~extensionPoints=[module(Products_ExtensionPointMapping)],
-    ~componentChapters=Dict.fromArray([("Categories", "Category"), ("Category", "Category"), ("Product", "Product"), ("ProductDemand", "ProductDemand"), ("ProductDemands", "ProductDemand"), ("Products", "Product")]),
+    ~componentChapters=Dict.fromArray([
+      ("Categories", "Category"),
+      ("Category", "Category"),
+      ("Product", "Product"),
+      ("ProductDemand", "ProductDemand"),
+      ("ProductDemands", "ProductDemand"),
+      ("Products", "Product"),
+    ]),
     ~lifecycleModel=LifecycleModel.model,
   )
 
@@ -50,10 +68,18 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
       ~heartbeatInterval=5,
       ~extensionPoints=[module(Products_ExtensionPoint)],
       ~extensions=[module(Orders_Extension)],
-      ~aggregates=[module(CategoryAggregate), module(ProductAggregate), module(ProductDemandAggregate)],
-      ~readModels=[module(CategoriesReadModel), module(ProductDemandsReadModel), module(ProductsReadModel)],
+      ~aggregates=[
+        module(CategoryAggregate),
+        module(ProductAggregate),
+        module(ProductDemandAggregate),
+      ],
+      ~readModels=[
+        module(CategoriesReadModel),
+        module(ProductDemandsReadModel),
+        module(ProductsReadModel),
+      ],
       ~tasks=[module(ImportProductsTask)],
-      ~pluginStructure=pluginStructure,
+      ~pluginStructure,
       ~uiFragments=?uiBundleUrl->Option.map(url =>
         Platform.Plugin.makeAutoUIManifest(
           ~remoteEntryUrl=url,

package/lib/bs/src/Product/ReadModel/Products.res

@@ -10,4 +10,3 @@ type state = {
   price: float,
   @storageRef("productImages") imageUrl: string,
 }
-

package/lib/bs/src/Product/ReadModel/Products_Projections.res

@@ -10,10 +10,9 @@ module ProductMapping = Mapping.Make(
     let project = ({event, id, _}) =>
       switch event {
       | Added({name, description, price, imageUrl}) =>
-        Set(id, {Products.name: name, description, price, imageUrl})
+        Set(id, {Products.name, description, price, imageUrl})
       | NameUpdated({name}) => Update(id, state => {...state, name})
-      | DescriptionUpdated({description}) =>
-        Update(id, state => {...state, description})
+      | DescriptionUpdated({description}) => Update(id, state => {...state, description})
       | PriceUpdated({price}) => Update(id, state => {...state, price})
       | ImageUpdated({imageUrl}) => Update(id, state => {...state, imageUrl})
       }

package/lib/bs/src/ProductDemand/ReadModel/ProductDemands.res

@@ -5,4 +5,3 @@
 
 @schema
 type state = {name: string, orderCount: int}
-

package/lib/bs/src/ProductDemand/ReadModel/ProductDemands_Projections.res

@@ -11,8 +11,7 @@ module ProductMapping = Mapping.Make(
     open Product
     let project = ({event, id, _}) =>
       switch event {
-      | Added({name}) =>
-        Set(id, {ProductDemands.name: name, orderCount: 0})
+      | Added({name}) => Set(id, {ProductDemands.name, orderCount: 0})
       | _ => Ignore
       }
   },
@@ -28,7 +27,10 @@ module ProductDemandMapping = Mapping.Make(
       | Recorded(_) =>
         Update(id, (state: ProductDemands.state) => {...state, orderCount: state.orderCount + 1})
       | Revoked(_) =>
-        Update(id, (state: ProductDemands.state) => {...state, orderCount: max(0, state.orderCount - 1)})
+        Update(
+          id,
+          (state: ProductDemands.state) => {...state, orderCount: max(0, state.orderCount - 1)},
+        )
       }
   },
 )

package/lib/bs/tests/ExtensionPoint/Products_ExtensionPointMapping_GWT.res

@@ -5,7 +5,12 @@
 describe("Products ExtensionPoint mapping", () => {
   test("Added publishes ProductBecameAvailable", () =>
     whenDelegateEvent(
-      Delegate.Added({name: "Book", description: "A good book", price: 9.99, imageUrl: "/productImages/book.jpg"}),
+      Delegate.Added({
+        name: "Book",
+        description: "A good book",
+        price: 9.99,
+        imageUrl: "/productImages/book.jpg",
+      }),
     )->thenPublishesEvent(
       "gwt-id",
       ExtensionPoint.ProductBecameAvailable({productId: "gwt-id", name: "Book", price: 9.99}),

package/lib/bs/tests/ProductDemand/ReadModel/ProductDemands_GWT.res

@@ -12,24 +12,52 @@ module ProductDemandGwt = ReventlessGwt.MultiSourceProjection_GWT.Make(
 ProductGwt.describe("ProductDemands ReadModel ← Product", () => {
   ProductGwt.test("Added initialises the entry with orderCount = 0", () =>
     ProductGwt.givenEvents([])
-    ->ProductGwt.whenEvent(Product.Added({name: "Laptop", description: "x", price: 1.0, imageUrl: "/productImages/laptop.jpg"}))
+    ->ProductGwt.whenEvent(
+      Product.Added({
+        name: "Laptop",
+        description: "x",
+        price: 1.0,
+        imageUrl: "/productImages/laptop.jpg",
+      }),
+    )
     ->ProductGwt.thenState({ProductDemands.name: "Laptop", orderCount: 0})
   )
 
   ProductGwt.test("NameUpdated is ignored (handled by Products read model)", () =>
-    ProductGwt.givenEvents([Product.Added({name: "Laptop", description: "x", price: 1.0, imageUrl: "/productImages/laptop.jpg"})])
+    ProductGwt.givenEvents([
+      Product.Added({
+        name: "Laptop",
+        description: "x",
+        price: 1.0,
+        imageUrl: "/productImages/laptop.jpg",
+      }),
+    ])
     ->ProductGwt.whenEvent(Product.NameUpdated({name: "Gaming Laptop"}))
     ->ProductGwt.thenState({ProductDemands.name: "Laptop", orderCount: 0})
   )
 
   ProductGwt.test("DescriptionUpdated is ignored", () =>
-    ProductGwt.givenEvents([Product.Added({name: "Laptop", description: "x", price: 1.0, imageUrl: "/productImages/laptop.jpg"})])
+    ProductGwt.givenEvents([
+      Product.Added({
+        name: "Laptop",
+        description: "x",
+        price: 1.0,
+        imageUrl: "/productImages/laptop.jpg",
+      }),
+    ])
     ->ProductGwt.whenEvent(Product.DescriptionUpdated({description: "y"}))
     ->ProductGwt.thenState({ProductDemands.name: "Laptop", orderCount: 0})
   )
 
   ProductGwt.test("PriceUpdated is ignored", () =>
-    ProductGwt.givenEvents([Product.Added({name: "Laptop", description: "x", price: 1.0, imageUrl: "/productImages/laptop.jpg"})])
+    ProductGwt.givenEvents([
+      Product.Added({
+        name: "Laptop",
+        description: "x",
+        price: 1.0,
+        imageUrl: "/productImages/laptop.jpg",
+      }),
+    ])
     ->ProductGwt.whenEvent(Product.PriceUpdated({price: 2.0}))
     ->ProductGwt.thenState({ProductDemands.name: "Laptop", orderCount: 0})
   )

package/lib/ocaml/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1788869294227)
-#Done(1788869299890)
+#Start(1789087727040)
+#Done(1789087733109)

package/lib/ocaml/Categories.res

@@ -8,4 +8,3 @@ type state = {
   name: string,
   archived: bool,
 }
-

package/lib/ocaml/LifecycleModel.res

@@ -6,5 +6,4 @@
 // `@transition` annotation where it says anything, and falls back to the
 // annotation where it is silent.
 
-let model: array<Reventless.Plugin.derivedEdge> = [
-]
+let model: array<Reventless.Plugin.derivedEdge> = []

package/lib/ocaml/Plugin.res

@@ -22,7 +22,10 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
 
   // ReadModels
   module CategoriesReadModel = Platform.ReadModel.Make(Categories, Categories_Projections)
-  module ProductDemandsReadModel = Platform.ReadModel.Make(ProductDemands, ProductDemands_Projections)
+  module ProductDemandsReadModel = Platform.ReadModel.Make(
+    ProductDemands,
+    ProductDemands_Projections,
+  )
   module ProductsReadModel = Platform.ReadModel.Make(Products, Products_Projections)
 
   // Tasks
@@ -36,11 +39,26 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
 
   let pluginStructure = Platform.Plugin.makePluginDefinition(
     ~name="Catalog",
-    ~aggregates=[module(CategoryAggregate), module(ProductAggregate), module(ProductDemandAggregate)],
-    ~readModels=[module(CategoriesReadModel), module(ProductDemandsReadModel), module(ProductsReadModel)],
+    ~aggregates=[
+      module(CategoryAggregate),
+      module(ProductAggregate),
+      module(ProductDemandAggregate),
+    ],
+    ~readModels=[
+      module(CategoriesReadModel),
+      module(ProductDemandsReadModel),
+      module(ProductsReadModel),
+    ],
     ~extensions=[module(Orders_Extension)],
     ~extensionPoints=[module(Products_ExtensionPointMapping)],
-    ~componentChapters=Dict.fromArray([("Categories", "Category"), ("Category", "Category"), ("Product", "Product"), ("ProductDemand", "ProductDemand"), ("ProductDemands", "ProductDemand"), ("Products", "Product")]),
+    ~componentChapters=Dict.fromArray([
+      ("Categories", "Category"),
+      ("Category", "Category"),
+      ("Product", "Product"),
+      ("ProductDemand", "ProductDemand"),
+      ("ProductDemands", "ProductDemand"),
+      ("Products", "Product"),
+    ]),
     ~lifecycleModel=LifecycleModel.model,
   )
 
@@ -50,10 +68,18 @@ module Make = (Platform: ReventlessInfra.Platform.T) => {
       ~heartbeatInterval=5,
       ~extensionPoints=[module(Products_ExtensionPoint)],
       ~extensions=[module(Orders_Extension)],
-      ~aggregates=[module(CategoryAggregate), module(ProductAggregate), module(ProductDemandAggregate)],
-      ~readModels=[module(CategoriesReadModel), module(ProductDemandsReadModel), module(ProductsReadModel)],
+      ~aggregates=[
+        module(CategoryAggregate),
+        module(ProductAggregate),
+        module(ProductDemandAggregate),
+      ],
+      ~readModels=[
+        module(CategoriesReadModel),
+        module(ProductDemandsReadModel),
+        module(ProductsReadModel),
+      ],
       ~tasks=[module(ImportProductsTask)],
-      ~pluginStructure=pluginStructure,
+      ~pluginStructure,
       ~uiFragments=?uiBundleUrl->Option.map(url =>
         Platform.Plugin.makeAutoUIManifest(
           ~remoteEntryUrl=url,

package/lib/ocaml/ProductDemands.res

@@ -5,4 +5,3 @@
 
 @schema
 type state = {name: string, orderCount: int}
-