Update ActusBlockly.purs

IntersectMBO · Oct 26, 2020 · 193d3e8 · 193d3e8
1 parent 99f3a16
commit 193d3e8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/marlowe-playground-client/src/Marlowe/ActusBlockly.purs b/marlowe-playground-client/src/Marlowe/ActusBlockly.purs
@@ -389,7 +389,7 @@ toolbox =
   xml [ id_ "actusBlocklyToolbox", style "display:none" ]
     [ category [ name "Contracts", colour actusColour ] (map mkBlock actusContractTypes)
     , category [ name "Values", colour valueColour ] (map mkBlock actusValueTypes)
-    , category [ name "Periods", colour valueColour ] (map mkBlock actusPeriodTypes)
+    , category [ name "Periods", colour periodColour ] (map mkBlock actusPeriodTypes)
     ]
   where
   mkBlock :: forall t. Show t => t -> _