typo ("Connnect")
This commit is contained in:
parent
052833c678
commit
86d50149e9
1 changed files with 1 additions and 1 deletions
|
@ -289,7 +289,7 @@ connectionNeeded = whenM noconnection $ do
|
||||||
void $ liftAssistant $ do
|
void $ liftAssistant $ do
|
||||||
close <- asIO1 removeAlert
|
close <- asIO1 removeAlert
|
||||||
addAlert $ connectionNeededAlert $ AlertButton
|
addAlert $ connectionNeededAlert $ AlertButton
|
||||||
{ buttonLabel = "Connnect"
|
{ buttonLabel = "Connect"
|
||||||
, buttonUrl = urlrender ConnectionNeededR
|
, buttonUrl = urlrender ConnectionNeededR
|
||||||
, buttonAction = Just close
|
, buttonAction = Just close
|
||||||
, buttonPrimary = True
|
, buttonPrimary = True
|
||||||
|
|
Loading…
Reference in a new issue