From c9f341bd303a2d7b58eb0a7f6b596b7b1d7948bd Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 26 Sep 2012 16:50:04 -0400
Subject: make the standalone OSX app automatically install itself when run

---
 Command/WebApp.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Command')

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
-- 
cgit v1.2.3