diff --git a/src/Potato/Flow/Vty/Tools.hs b/src/Potato/Flow/Vty/Tools.hs index 20a26a1..94e23b3 100644 --- a/src/Potato/Flow/Vty/Tools.hs +++ b/src/Potato/Flow/Vty/Tools.hs @@ -59,6 +59,8 @@ holdToolsWidget ToolWidgetConfig {..} = mdo textb = void $ ffilter (==4) radioEvs textareaB = void $ ffilter (==5) radioEvs + -- TODO if shape tool, show shape options + let setTool = leftmost [Tool_Select <$ leftmost [selectB]