Merge pull request #385 from TomSmeets/tree-select-fix-origin

TreeSelect: Resolve issue #362 with origin offset being ignored
This commit is contained in:
Brent Yorgey
2020-09-19 13:23:35 -05:00
committed by GitHub

View File

@@ -599,7 +599,7 @@ drawNode ix iy TSNode{..} col = do
colormap <- gets tss_colormap
visual <- gets tss_visual
liftIO $ drawWinBox window display visual colormap gc font col tsn_name ts_extra tsn_extra
(ix * ts_indent) (iy * ts_node_height)
(ix * ts_indent + ts_originX) (iy * ts_node_height + ts_originY)
ts_node_width ts_node_height
-- TODO: draw extra text (transparent background? or ts_background)