Commit e80b6e1b authored by Steffen Michels's avatar Steffen Michels

fix dynamic editor layout

parent b0489209
Pipeline #20796 passed with stage
in 4 minutes and 45 seconds
...@@ -28,7 +28,7 @@ import Data.Functor ...@@ -28,7 +28,7 @@ import Data.Functor
tunedDynamicConsEditor :: !DynamicConsOption !DynamicCons -> DynamicCons tunedDynamicConsEditor :: !DynamicConsOption !DynamicCons -> DynamicCons
tunedDynamicConsEditor HideIfOnlyChoice cons = {cons & showIfOnlyChoice = False} tunedDynamicConsEditor HideIfOnlyChoice cons = {cons & showIfOnlyChoice = False}
tunedDynamicConsEditor UseAsDefault cons = {cons & useAsDefault = True} tunedDynamicConsEditor UseAsDefault cons = {cons & useAsDefault = True}
tunedDynamicConsEditor LayoutVertical cons = {cons & uiAttributes = 'Map'.union (classAttr ["itasks-horizontal"]) cons.uiAttributes} tunedDynamicConsEditor LayoutVertical cons = {cons & uiAttributes = 'Map'.union (classAttr ["itasks-vertical"]) cons.uiAttributes}
functionCons :: !String !String !a -> DynamicCons | TC a functionCons :: !String !String !a -> DynamicCons | TC a
functionCons consId label func = functionConsDyn consId label (dynamic func) functionCons consId label func = functionConsDyn consId label (dynamic func)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment