From a6e3dd7e572ff010d7e0154e1d7fbebaad79160a Mon Sep 17 00:00:00 2001 From: Francisco Vallarino Date: Fri, 6 Nov 2020 22:14:42 -0300 Subject: [PATCH] Fix state handling in label --- src/Monomer/Widgets/Label.hs | 6 ------ 1 file changed, 6 deletions(-) diff --git a/src/Monomer/Widgets/Label.hs b/src/Monomer/Widgets/Label.hs index 5bc088d3..05425fd4 100644 --- a/src/Monomer/Widgets/Label.hs +++ b/src/Monomer/Widgets/Label.hs @@ -83,7 +83,6 @@ makeLabel :: LabelCfg -> LabelState -> Widget s e makeLabel config state = widget where widget = createSingle def { singleGetBaseStyle = getBaseStyle, - singleMerge = merge, singleGetSizeReq = getSizeReq, singleResize = resize, singleRender = render @@ -97,11 +96,6 @@ makeLabel config state = widget where getBaseStyle wenv inst = Just style where style = collectTheme wenv L.labelStyle - merge wenv oldState inst = resultWidget newInstance where - newInstance = inst { - _wiWidget = makeLabel config state - } - getSizeReq wenv inst = sizeReq where style = activeStyle wenv inst targetW = fmap getMinSizeReq (style ^. L.sizeReqW)