mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

make the standalone OSX app automatically install itself when run

Browse source
This commit is contained in:
Joey Hess 2012-09-26 16:50:04 -04:00
parent 521b64f7ee
commit 3da78cc241
6 changed files with 117 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/WebApp.hs
View file

@ -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