brick 2.3 → 2.3.1
raw patch · 3 files changed
+9/−2 lines, 3 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Brick.BorderMap: eBottomL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.BorderMap: eBottomL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.BorderMap: eLeftL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.BorderMap: eLeftL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.BorderMap: eRightL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.BorderMap: eRightL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.BorderMap: eTopL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.BorderMap: eTopL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.Types: availHeightL :: forall n_asX9. Lens' (Context n_asX9) Int
+ Brick.Types: availHeightL :: forall n_awyf. Lens' (Context n_awyf) Int
- Brick.Types: availWidthL :: forall n_asX9. Lens' (Context n_asX9) Int
+ Brick.Types: availWidthL :: forall n_awyf. Lens' (Context n_awyf) Int
- Brick.Types: bordersL :: forall n_asXd. Lens' (Result n_asXd) (BorderMap DynBorder)
+ Brick.Types: bordersL :: forall n_awyj. Lens' (Result n_awyj) (BorderMap DynBorder)
- Brick.Types: ctxAttrMapL :: forall n_asX9. Lens' (Context n_asX9) AttrMap
+ Brick.Types: ctxAttrMapL :: forall n_awyf. Lens' (Context n_awyf) AttrMap
- Brick.Types: ctxAttrNameL :: forall n_asX9. Lens' (Context n_asX9) AttrName
+ Brick.Types: ctxAttrNameL :: forall n_awyf. Lens' (Context n_awyf) AttrName
- Brick.Types: ctxBorderStyleL :: forall n_asX9. Lens' (Context n_asX9) BorderStyle
+ Brick.Types: ctxBorderStyleL :: forall n_awyf. Lens' (Context n_awyf) BorderStyle
- Brick.Types: ctxDynBordersL :: forall n_asX9. Lens' (Context n_asX9) Bool
+ Brick.Types: ctxDynBordersL :: forall n_awyf. Lens' (Context n_awyf) Bool
- Brick.Types: ctxHScrollBarOrientationL :: forall n_asX9. Lens' (Context n_asX9) (Maybe HScrollBarOrientation)
+ Brick.Types: ctxHScrollBarOrientationL :: forall n_awyf. Lens' (Context n_awyf) (Maybe HScrollBarOrientation)
- Brick.Types: ctxHScrollBarRendererL :: forall n_asX9. Lens' (Context n_asX9) (Maybe (HScrollbarRenderer n_asX9))
+ Brick.Types: ctxHScrollBarRendererL :: forall n_awyf. Lens' (Context n_awyf) (Maybe (HScrollbarRenderer n_awyf))
- Brick.Types: ctxVScrollBarOrientationL :: forall n_asX9. Lens' (Context n_asX9) (Maybe VScrollBarOrientation)
+ Brick.Types: ctxVScrollBarOrientationL :: forall n_awyf. Lens' (Context n_awyf) (Maybe VScrollBarOrientation)
- Brick.Types: ctxVScrollBarRendererL :: forall n_asX9. Lens' (Context n_asX9) (Maybe (VScrollbarRenderer n_asX9))
+ Brick.Types: ctxVScrollBarRendererL :: forall n_awyf. Lens' (Context n_awyf) (Maybe (VScrollbarRenderer n_awyf))
- Brick.Types: cursorLocationL :: forall n_asXe. Lens' (CursorLocation n_asXe) Location
+ Brick.Types: cursorLocationL :: forall n_awyk. Lens' (CursorLocation n_awyk) Location
- Brick.Types: cursorLocationNameL :: forall n_asXe n_avwz. Lens (CursorLocation n_asXe) (CursorLocation n_avwz) (Maybe n_asXe) (Maybe n_avwz)
+ Brick.Types: cursorLocationNameL :: forall n_awyk n_az7W. Lens (CursorLocation n_awyk) (CursorLocation n_az7W) (Maybe n_awyk) (Maybe n_az7W)
- Brick.Types: cursorsL :: forall n_asXd. Lens' (Result n_asXd) [CursorLocation n_asXd]
+ Brick.Types: cursorsL :: forall n_awyj. Lens' (Result n_awyj) [CursorLocation n_awyj]
- Brick.Types: eBottomL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.Types: eBottomL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.Types: eLeftL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.Types: eLeftL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.Types: eRightL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.Types: eRightL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.Types: eTopL :: forall a_af2e. Lens' (Edges a_af2e) a_af2e
+ Brick.Types: eTopL :: forall a_agkc. Lens' (Edges a_agkc) a_agkc
- Brick.Types: extentsL :: forall n_asXd. Lens' (Result n_asXd) [Extent n_asXd]
+ Brick.Types: extentsL :: forall n_awyj. Lens' (Result n_awyj) [Extent n_awyj]
- Brick.Types: imageL :: forall n_asXd. Lens' (Result n_asXd) Image
+ Brick.Types: imageL :: forall n_awyj. Lens' (Result n_awyj) Image
- Brick.Types: visibilityRequestsL :: forall n_asXd. Lens' (Result n_asXd) [VisibilityRequest]
+ Brick.Types: visibilityRequestsL :: forall n_awyj. Lens' (Result n_awyj) [VisibilityRequest]
- Brick.Types: windowHeightL :: forall n_asX9. Lens' (Context n_asX9) Int
+ Brick.Types: windowHeightL :: forall n_awyf. Lens' (Context n_awyf) Int
- Brick.Types: windowWidthL :: forall n_asX9. Lens' (Context n_asX9) Int
+ Brick.Types: windowWidthL :: forall n_awyf. Lens' (Context n_awyf) Int
- Brick.Widgets.Dialog: dialogButtonsL :: forall a_a1fxF n_a1fxG a_a1fyD. Lens (Dialog a_a1fxF n_a1fxG) (Dialog a_a1fyD n_a1fxG) [(String, n_a1fxG, a_a1fxF)] [(String, n_a1fxG, a_a1fyD)]
+ Brick.Widgets.Dialog: dialogButtonsL :: forall a_a1rji n_a1rjj a_a1rkg. Lens (Dialog a_a1rji n_a1rjj) (Dialog a_a1rkg n_a1rjj) [(String, n_a1rjj, a_a1rji)] [(String, n_a1rjj, a_a1rkg)]
- Brick.Widgets.Dialog: dialogTitleL :: forall a_a1fxF n_a1fxG. Lens' (Dialog a_a1fxF n_a1fxG) (Maybe (Widget n_a1fxG))
+ Brick.Widgets.Dialog: dialogTitleL :: forall a_a1rji n_a1rjj. Lens' (Dialog a_a1rji n_a1rjj) (Maybe (Widget n_a1rjj))
- Brick.Widgets.Dialog: dialogWidthL :: forall a_a1fxF n_a1fxG. Lens' (Dialog a_a1fxF n_a1fxG) Int
+ Brick.Widgets.Dialog: dialogWidthL :: forall a_a1rji n_a1rjj. Lens' (Dialog a_a1rji n_a1rjj) Int
- Brick.Widgets.Edit: editContentsL :: forall t_a18Gr n_a18Gs t_a18Hc. Lens (Editor t_a18Gr n_a18Gs) (Editor t_a18Hc n_a18Gs) (TextZipper t_a18Gr) (TextZipper t_a18Hc)
+ Brick.Widgets.Edit: editContentsL :: forall t_a1jrQ n_a1jrR t_a1jsB. Lens (Editor t_a1jrQ n_a1jrR) (Editor t_a1jsB n_a1jrR) (TextZipper t_a1jrQ) (TextZipper t_a1jsB)
- Brick.Widgets.FileBrowser: fileBrowserEntriesG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (List n_a1qaa FileInfo)
+ Brick.Widgets.FileBrowser: fileBrowserEntriesG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (List n_a1E1D FileInfo)
- Brick.Widgets.FileBrowser: fileBrowserEntryFilterG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (Maybe (FileInfo -> Bool))
+ Brick.Widgets.FileBrowser: fileBrowserEntryFilterG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (Maybe (FileInfo -> Bool))
- Brick.Widgets.FileBrowser: fileBrowserExceptionG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (Maybe IOException)
+ Brick.Widgets.FileBrowser: fileBrowserExceptionG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (Maybe IOException)
- Brick.Widgets.FileBrowser: fileBrowserLatestResultsG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) [FileInfo]
+ Brick.Widgets.FileBrowser: fileBrowserLatestResultsG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) [FileInfo]
- Brick.Widgets.FileBrowser: fileBrowserNameG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) n_a1qaa
+ Brick.Widgets.FileBrowser: fileBrowserNameG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) n_a1E1D
- Brick.Widgets.FileBrowser: fileBrowserSearchStringG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (Maybe Text)
+ Brick.Widgets.FileBrowser: fileBrowserSearchStringG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (Maybe Text)
- Brick.Widgets.FileBrowser: fileBrowserSelectableG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (FileInfo -> Bool)
+ Brick.Widgets.FileBrowser: fileBrowserSelectableG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (FileInfo -> Bool)
- Brick.Widgets.FileBrowser: fileBrowserSelectableL :: forall n_a1qaa. Lens' (FileBrowser n_a1qaa) (FileInfo -> Bool)
+ Brick.Widgets.FileBrowser: fileBrowserSelectableL :: forall n_a1E1D. Lens' (FileBrowser n_a1E1D) (FileInfo -> Bool)
- Brick.Widgets.FileBrowser: fileBrowserSelectedFilesG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) (Set String)
+ Brick.Widgets.FileBrowser: fileBrowserSelectedFilesG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) (Set String)
- Brick.Widgets.FileBrowser: fileBrowserWorkingDirectoryG :: forall n_a1qaa. SimpleGetter (FileBrowser n_a1qaa) FilePath
+ Brick.Widgets.FileBrowser: fileBrowserWorkingDirectoryG :: forall n_a1E1D. SimpleGetter (FileBrowser n_a1E1D) FilePath
- Brick.Widgets.List: listElementsL :: forall n_a1kCa t_a1kCb e_a1kCc t_a1kRL e_a1kRM. Lens (GenericList n_a1kCa t_a1kCb e_a1kCc) (GenericList n_a1kCa t_a1kRL e_a1kRM) (t_a1kCb e_a1kCc) (t_a1kRL e_a1kRM)
+ Brick.Widgets.List: listElementsL :: forall n_a1xEK t_a1xEL e_a1xEM t_a1xUl e_a1xUm. Lens (GenericList n_a1xEK t_a1xEL e_a1xEM) (GenericList n_a1xEK t_a1xUl e_a1xUm) (t_a1xEL e_a1xEM) (t_a1xUl e_a1xUm)
- Brick.Widgets.List: listItemHeightL :: forall n_a1kCa t_a1kCb e_a1kCc. Lens' (GenericList n_a1kCa t_a1kCb e_a1kCc) Int
+ Brick.Widgets.List: listItemHeightL :: forall n_a1xEK t_a1xEL e_a1xEM. Lens' (GenericList n_a1xEK t_a1xEL e_a1xEM) Int
- Brick.Widgets.List: listNameL :: forall n_a1kCa t_a1kCb e_a1kCc n_a1kRN. Lens (GenericList n_a1kCa t_a1kCb e_a1kCc) (GenericList n_a1kRN t_a1kCb e_a1kCc) n_a1kCa n_a1kRN
+ Brick.Widgets.List: listNameL :: forall n_a1xEK t_a1xEL e_a1xEM n_a1xUn. Lens (GenericList n_a1xEK t_a1xEL e_a1xEM) (GenericList n_a1xUn t_a1xEL e_a1xEM) n_a1xEK n_a1xUn
- Brick.Widgets.List: listSelectedL :: forall n_a1kCa t_a1kCb e_a1kCc. Lens' (GenericList n_a1kCa t_a1kCb e_a1kCc) (Maybe Int)
+ Brick.Widgets.List: listSelectedL :: forall n_a1xEK t_a1xEL e_a1xEM. Lens' (GenericList n_a1xEK t_a1xEL e_a1xEM) (Maybe Int)
Files
- CHANGELOG.md +7/−0
- brick.cabal +1/−1
- src/Brick/Forms.hs +1/−1
CHANGELOG.md view
@@ -2,6 +2,13 @@ Brick changelog --------------- +2.3.1+-----++Bug fixes:+* Form field rendering now correctly checks for form field focus when+ its visibility mode is `ShowAugmentedField`.+ 2.3 ---
brick.cabal view
@@ -1,5 +1,5 @@ name: brick-version: 2.3+version: 2.3.1 synopsis: A declarative terminal user interface library description: Write terminal user interfaces (TUIs) painlessly with 'brick'! You
src/Brick/Forms.hs view
@@ -836,7 +836,7 @@ in (n, maybeFieldVisible $ maybeInvalid $ renderField fieldFoc st) : renderFields fs (fieldNames, renderedFields) = unzip $ renderFields fields maybeHelperVisible =- if visMode == ShowAugmentedField then visible else id+ if foc && visMode == ShowAugmentedField then visible else id in maybeHelperVisible $ helper $ maybeVisible $ concatFields renderedFields -- | Dispatch an event to the currently focused form field. This handles