typo ("Connnect")

This commit is contained in:
Fil 2014-06-03 00:04:21 +02:00
parent 052833c678
commit 86d50149e9

View file

@ -289,7 +289,7 @@ connectionNeeded = whenM noconnection $ do
void $ liftAssistant $ do
close <- asIO1 removeAlert
addAlert $ connectionNeededAlert $ AlertButton
{ buttonLabel = "Connnect"
{ buttonLabel = "Connect"
, buttonUrl = urlrender ConnectionNeededR
, buttonAction = Just close
, buttonPrimary = True