(re)start XMPP when it's configured in the webapp
This commit is contained in:
parent
2dc40ecbd1
commit
c71836269b
5 changed files with 12 additions and 3 deletions
|
@ -17,6 +17,7 @@ import Utility.Yesod
|
|||
#ifdef WITH_XMPP
|
||||
import Assistant.Common
|
||||
import Assistant.XMPP
|
||||
import Assistant.Pushes
|
||||
import Utility.SRV
|
||||
#endif
|
||||
|
||||
|
@ -45,6 +46,7 @@ getXMPPR = xmppPage $ do
|
|||
where
|
||||
storecreds creds = do
|
||||
void $ runAnnex undefined $ setXMPPCreds creds
|
||||
liftIO . notifyRestart =<< pushNotifier <$> getYesod
|
||||
redirect ConfigR
|
||||
#else
|
||||
getXMPPR = xmppPage $
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue