twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 11:30:22 -07:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
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
commit dea887d487
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Actions/TreeSelect.hs
View File

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