removes newline after set' function
This commit is contained in:
parent
3d49f79beb
commit
ca5c5550ab
@ -493,7 +493,6 @@ set' :: (MonadReader AppState m, MonadIO m, MonadThrow m, MonadFail m, MonadMask
|
|||||||
=> BrickState
|
=> BrickState
|
||||||
-> (Int, ListResult)
|
-> (Int, ListResult)
|
||||||
-> m (Either String ())
|
-> m (Either String ())
|
||||||
|
|
||||||
set' bs input@(_, ListResult {..}) = do
|
set' bs input@(_, ListResult {..}) = do
|
||||||
settings <- liftIO $ readIORef settings'
|
settings <- liftIO $ readIORef settings'
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user