diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-09-26 16:50:04 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-09-26 16:50:04 -0400 |
| commit | c9f341bd303a2d7b58eb0a7f6b596b7b1d7948bd (patch) | |
| tree | 4f9097afb1cb69f1ba9653f6a90cb26ad0ddc090 /Command/WebApp.hs | |
| parent | cb1913e6cddfa090bda8b860d9b4129d83cf2c83 (diff) | |
make the standalone OSX app automatically install itself when run
Diffstat (limited to 'Command/WebApp.hs')
| -rw-r--r-- | Command/WebApp.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Command/WebApp.hs b/Command/WebApp.hs index f44053250..7ad6566c9 100644 --- a/Command/WebApp.hs +++ b/Command/WebApp.hs @@ -17,6 +17,7 @@ import Assistant.TransferQueue import Assistant.TransferSlots import Assistant.Threads.WebApp import Assistant.WebApp +import Assistant.Install import Utility.WebApp import Utility.Daemon (checkDaemon, lockPidFile) import Init @@ -39,6 +40,7 @@ seek = [withNothing start] start :: CommandStart start = notBareRepo $ do + liftIO $ ensureInstalled ifM isInitialized ( go , liftIO startNoRepo ) stop where |