Skip to content
Snippets Groups Projects
Commit 9e142389 authored by Matthew Pickering's avatar Matthew Pickering
Browse files

Correct padding

parent 2976d01e
No related branches found
No related tags found
No related merge requests found
Pipeline #92137 failed
Stage: test
Hide whitespace changes
Inline Side-by-side
ghc-debug-brick/src/Main.hs
+ 1
− 1
View file @ 9e142389
......@@ -1042,7 +1042,7 @@ dispatchFooterInput dbg (FProfile lvl) form = do
]
renderWithStats l = renderHeaderPane l <+>
(padRight Brick.Max $ renderHeaderPane (ProfileLine "Total" total_stats))
(padRight (Pad 1) $ (padLeft Brick.Max $ renderHeaderPane (ProfileLine "Total" total_stats))
......
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