Skip to content

Commit

Permalink
Core: haddock edits
Browse files Browse the repository at this point in the history
  • Loading branch information
jtdaugherty committed Sep 1, 2023
1 parent c1aa330 commit 0c92c0d
Showing 1 changed file with 10 additions and 4 deletions.
14 changes: 10 additions & 4 deletions src/Brick/Widgets/Core.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1613,7 +1613,7 @@ maybeClick :: (Ord n)
maybeClick _ Nothing _ w = w
maybeClick n (Just f) el w = clickable (f el n) w

-- | Build a vertical scroll bar using the specified render and
-- | Build a vertical scroll bar using the specified renderer and
-- settings.
--
-- You probably don't want to use this directly; instead,
Expand All @@ -1625,7 +1625,10 @@ verticalScrollbar :: (Ord n)
=> ScrollbarRenderer n
-- ^ The renderer to use.
-> VScrollBarOrientation
-- ^ The scroll bar orientation.
-- ^ The scroll bar orientation. The orientation
-- governs how additional padding is added to
-- the scroll bar if it is smaller than it space
-- allocation according to 'scrollbarAllocation'.
-> n
-- ^ The viewport name associated with this scroll
-- bar.
Expand Down Expand Up @@ -1721,7 +1724,7 @@ verticalScrollbar' vsRenderer n constr vpHeight vOffset contentHeight =

render sb

-- | Build a horizontal scroll bar using the specified render and
-- | Build a horizontal scroll bar using the specified renderer and
-- settings.
--
-- You probably don't want to use this directly; instead, use
Expand All @@ -1733,7 +1736,10 @@ horizontalScrollbar :: (Ord n)
=> ScrollbarRenderer n
-- ^ The renderer to use.
-> HScrollBarOrientation
-- ^ The scroll bar orientation.
-- ^ The scroll bar orientation. The orientation
-- governs how additional padding is added to
-- the scroll bar if it is smaller than it space
-- allocation according to 'scrollbarAllocation'.
-> n
-- ^ The viewport name associated with this scroll
-- bar.
Expand Down

0 comments on commit 0c92c0d

Please sign in to comment.