diff --git a/lib/Commands.ml b/lib/Commands.ml index 44fd17b..17859c8 100644 --- a/lib/Commands.ml +++ b/lib/Commands.ml @@ -12753,26 +12753,25 @@ module DigitalCredentials = struct module Params = struct type t = { - behavior : Types.DigitalCredentials.VirtualWalletBehavior.t; - [@key "behavior"] [@ocaml.doc "The behavior of the virtual wallet."] + action : Types.DigitalCredentials.VirtualWalletAction.t; + [@key "action"] [@ocaml.doc "The action of the virtual wallet."] protocol : string option; [@key "protocol"] [@yojson.option] [@ocaml.doc "The protocol identifier (e.g. \"openid4vp\"). Required when \ - |behavior| is\n\ + |action| is\n\ \"respond\", forbidden otherwise."] response : Types.assoc option; [@key "response"] [@yojson.option] [@ocaml.doc "The response data object returned by the wallet.\n\ - Required when |behavior| is \"respond\", forbidden otherwise."] + Required when |action| is \"respond\", forbidden otherwise."] } [@@deriving yojson] - let make ~behavior ?protocol ?response () = - { behavior; protocol; response } + let make ~action ?protocol ?response () = { action; protocol; response } end module Request = struct diff --git a/lib/Types.ml b/lib/Types.ml index 6413b0a..62096eb 100644 --- a/lib/Types.ml +++ b/lib/Types.ml @@ -15434,34 +15434,28 @@ end = struct end and DigitalCredentials : sig - module rec VirtualWalletBehavior : sig - type _virtualwalletbehavior = [ `respond | `decline | `wait | `clear ] + module rec VirtualWalletAction : sig + type _virtualwalletaction = [ `respond | `decline | `wait | `clear ] - val _virtualwalletbehavior_of_yojson : - Yojson.Basic.t -> _virtualwalletbehavior + val _virtualwalletaction_of_yojson : Yojson.Basic.t -> _virtualwalletaction + val yojson_of__virtualwalletaction : _virtualwalletaction -> Yojson.Basic.t - val yojson_of__virtualwalletbehavior : - _virtualwalletbehavior -> Yojson.Basic.t - - type t = _virtualwalletbehavior + type t = _virtualwalletaction [@@deriving yojson] [@@ocaml.doc "The type of virtual wallet action."] end end = struct - module rec VirtualWalletBehavior : sig - type _virtualwalletbehavior = [ `respond | `decline | `wait | `clear ] - - val _virtualwalletbehavior_of_yojson : - Yojson.Basic.t -> _virtualwalletbehavior + module rec VirtualWalletAction : sig + type _virtualwalletaction = [ `respond | `decline | `wait | `clear ] - val yojson_of__virtualwalletbehavior : - _virtualwalletbehavior -> Yojson.Basic.t + val _virtualwalletaction_of_yojson : Yojson.Basic.t -> _virtualwalletaction + val yojson_of__virtualwalletaction : _virtualwalletaction -> Yojson.Basic.t - type t = _virtualwalletbehavior + type t = _virtualwalletaction [@@deriving yojson] [@@ocaml.doc "The type of virtual wallet action."] end = struct - type _virtualwalletbehavior = [ `respond | `decline | `wait | `clear ] + type _virtualwalletaction = [ `respond | `decline | `wait | `clear ] - let _virtualwalletbehavior_of_yojson = function + let _virtualwalletaction_of_yojson = function | `String "respond" -> `respond | `String "decline" -> `decline | `String "wait" -> `wait @@ -15469,13 +15463,13 @@ end = struct | `String s -> failwith ("unknown enum: " ^ s) | _ -> failwith "unknown enum type" - let yojson_of__virtualwalletbehavior = function + let yojson_of__virtualwalletaction = function | `respond -> `String "respond" | `decline -> `String "decline" | `wait -> `String "wait" | `clear -> `String "clear" - type t = _virtualwalletbehavior + type t = _virtualwalletaction [@@deriving yojson] [@@ocaml.doc "The type of virtual wallet action."] end end diff --git a/package.json b/package.json index 03f46c4..81883f9 100644 --- a/package.json +++ b/package.json @@ -1,6 +1,6 @@ { "name": "cdp", - "version": "0.0.1655900", + "version": "0.0.1656784", "description": "Chrome Devtools Protocol Types for OCaml", "license": "MIT", "repository": {