whitespace fixes
This commit is contained in:
parent
f87a781aa6
commit
0d50a6105b
33 changed files with 97 additions and 100 deletions
|
@ -71,7 +71,7 @@ type AlertMap = M.Map AlertId Alert
|
|||
|
||||
{- Higher AlertId indicates a more recent alert. -}
|
||||
newtype AlertId = AlertId Integer
|
||||
deriving (Read, Show, Eq, Ord)
|
||||
deriving (Read, Show, Eq, Ord)
|
||||
|
||||
firstAlertId :: AlertId
|
||||
firstAlertId = AlertId 0
|
||||
|
@ -247,7 +247,7 @@ syncAlert rs = baseActivityAlert
|
|||
[Tensed "Syncing" "Synced", "with", showRemotes rs]
|
||||
, alertData = []
|
||||
, alertPriority = Low
|
||||
}
|
||||
}
|
||||
|
||||
scanAlert :: [Remote] -> Alert
|
||||
scanAlert rs = baseActivityAlert
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue