mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-09-11 15:55:54 +03:00
Whitespace
This commit is contained in:
parent
10d247ec9a
commit
12fff78b9e
@ -903,7 +903,10 @@ entryBefore as a =
|
||||
i' = if i == 0 then length as - 1 else i - 1
|
||||
in as !! i'
|
||||
|
||||
withFocusAndGrouping :: (Eq n) => BrickEvent n e -> (n -> [n] -> EventM n (Form s e n) ()) -> EventM n (Form s e n) ()
|
||||
withFocusAndGrouping :: (Eq n)
|
||||
=> BrickEvent n e
|
||||
-> (n -> [n] -> EventM n (Form s e n) ())
|
||||
-> EventM n (Form s e n) ()
|
||||
withFocusAndGrouping e act = do
|
||||
foc <- gets formFocus
|
||||
case focusGetCurrent foc of
|
||||
|
Loading…
Reference in New Issue
Block a user