webapp: Display an alert when there are XMPP remotes, and a cloud transfer repository needs to be configured.
This commit is contained in:
parent
39e979fb65
commit
77c82de4ea
13 changed files with 146 additions and 27 deletions
|
@ -81,6 +81,15 @@ mainRepoSelector = RepoSelector
|
|||
, nudgeAddMore = False
|
||||
}
|
||||
|
||||
{- List of cloud repositories, configured and not. -}
|
||||
cloudRepoList :: Widget
|
||||
cloudRepoList = repoListDisplay $ RepoSelector
|
||||
{ onlyCloud = True
|
||||
, onlyConfigured = False
|
||||
, includeHere = False
|
||||
, nudgeAddMore = False
|
||||
}
|
||||
|
||||
repoListDisplay :: RepoSelector -> Widget
|
||||
repoListDisplay reposelector = do
|
||||
autoUpdate ident (NotifierRepoListR reposelector) (10 :: Int) (10 :: Int)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue