Fix lens setter for UTXO radio field

input-output-hk · Sep 10, 2021 · 99aaf5b · 99aaf5b
1 parent 2300b12
commit 99aaf5b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/hydra-tui/src/Hydra/TUI.hs b/hydra-tui/src/Hydra/TUI.hs
@@ -482,7 +482,7 @@ utxoRadioField ::
   [s -> FormFieldState s e n]
 utxoRadioField u =
   [ radioField
-      (lens id const)
+      (lens id seq)
       [ (i, show i, prettyUtxo i)
       | i <- Map.toList u
       ]