diff options
Diffstat (limited to 'Assistant/XMPP/Client.hs')
| -rw-r--r-- | Assistant/XMPP/Client.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Assistant/XMPP/Client.hs b/Assistant/XMPP/Client.hs index 52485fd09..8ab0c2857 100644 --- a/Assistant/XMPP/Client.hs +++ b/Assistant/XMPP/Client.hs @@ -72,6 +72,7 @@ setXMPPCreds :: XMPPCreds -> Annex () setXMPPCreds creds = do f <- xmppCredsFile liftIO $ do + createDirectoryIfMissing True (parentDir f) h <- openFile f WriteMode modifyFileMode f $ removeModes [groupReadMode, otherReadMode] |