Prototype SV governance voter flow

daml/dars.lock

@@ -68,14 +68,15 @@ splice-dso-governance 0.1.21 2d306cfe8cdb3daf2d21f84dfecc3e2f26a41504e58fe25cb7f
 splice-dso-governance 0.1.22 5c28530209b9ab37c5f187132cd826709bb18b0efe28411488ab750870414738
 splice-dso-governance 0.1.23 0c94a036ac5168a1dee26b435838e062f0d2f47d6eac49303978228ae559edb9
 splice-dso-governance 0.1.24 4974c654485d4ecaa6b5caf8ef3c2679efa8195c4b50d4965a8fff1b72e8efa4
+splice-dso-governance 0.1.25 0f18b9a3ff0e278dea3cc2a575fa0e0821c64aa42dc849f51ab54711fca8bd2c
 splice-dso-governance 0.1.3 b0ae3cc03e418790305a3c15f761fe495572de5827f8d322fb8b96996b783c13
 splice-dso-governance 0.1.4 dc24fd18b4d151cd1e0ff6bfb7438bafb2f50fe076d0f16f50565e60b153a0be
 splice-dso-governance 0.1.5 9e3ca1d22ad495dfabf3d61acae3dc1a7718f527f02092280b58cf69edfdc84c
 splice-dso-governance 0.1.6 4e7653cfbf7ca249de4507aca9cd3b91060e5489042a522c589d3c4199580cd8
 splice-dso-governance 0.1.7 d406eba1132d464605f4dae3edf8cf5ecbbb34bd8edef0e047e7e526d328718c
 splice-dso-governance 0.1.8 1790a114f83d5f290261fae1e7e46fba75a861a3dd603c6b4ef6b67b49053948
 splice-dso-governance 0.1.9 9ee83bfd872f91e659b8a8439c5b4eaf240bcf6f19698f884d7d7993ab48c401
-splice-dso-governance-test 0.1.30 13e5d00f8e2874f2d7480a1df1e622a97733dfa97406a9a04ff293823ab942b3
+splice-dso-governance-test 0.1.31 3766649982806b360bede1f12df9584bb336ec95881fe7021f81f5785e3dfd7c
 splice-token-standard-test 1.0.13 a556574314ab5ecbfa04b04a6b6c9259cf90388461fe307ba712257ad5993a6b
 splice-token-test-dummy-holding 0.0.1 1cd171c6c42ab46dc9cf12d80c6111369e00cea5cdf054924b4f26ce94b1ef5b
 splice-token-test-dummy-holding 0.0.2 4f40fb033ef3db89623642c1b494e846097fa32af138b3864a63aa15937a323d

daml/splice-dso-governance-test/daml.yaml

@@ -1,7 +1,7 @@
 sdk-version: 3.4.11
 name: splice-dso-governance-test
 source: daml
-version: 0.1.30
+version: 0.1.31
 dependencies:
   - daml-prim
   - daml-stdlib

daml/splice-dso-governance-test/daml/Splice/Scripts/DsoTestUtils.daml

@@ -330,7 +330,7 @@ executeAllDefinitiveVotes app = do
   now <- getTime
   requests <- query @VoteRequest app.dso
   forA_ requests $ \(requestCid, request) -> do
-    let activeSvs = Set.fromList $ map (.name) $ Map.values rules.svs
+    let activeSvs = Set.fromList $ Map.keys rules.svs
     let execute = request.voteBefore <= now ||
           (activeSvs == Set.fromList (Map.keys request.votes))
     when execute $ do
@@ -356,6 +356,8 @@ initiateAndCastVote app (initiator::others) targetEffectiveAt action = do
           requestCid
           vote = Vote with
             sv
+            castBy = sv
+            castByRole = VCR_Operator
             accept = True
             reason = Reason with url = ""; body = "✓"
             optCastAt = None
@@ -379,6 +381,8 @@ initiateAndAcceptVote app (initiator::others) action = do
           requestCid
           vote = Vote with
             sv
+            castBy = sv
+            castByRole = VCR_Operator
             accept = True
             reason = Reason with url = ""; body = "✓"
             optCastAt = None
@@ -392,6 +396,8 @@ castVote app sv requestCid vote = do
         requestCid = requestCid
         vote = Vote with
             sv = sv
+            castBy = sv
+            castByRole = VCR_Operator
             accept = vote
             reason = Reason with
                 url = ""