diff options
author | Joey Hess <joey@kitenet.net> | 2012-08-01 16:40:38 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-08-01 16:40:38 -0400 |
commit | d7a2600edd1989934c61ae5a80fdc2ee385d49c5 (patch) | |
tree | 9529886ec138e56ae4be2f9b52b869c0c4a1bd0f | |
parent | ca512f1450d919397b6eb4fbc54e32e70677c8f7 (diff) |
webapp is no longer a daemon
Remove --foreground and --stop options from it.
-rw-r--r-- | Command/WebApp.hs | 13 | ||||
-rw-r--r-- | doc/git-annex.mdwn | 4 |
2 files changed, 6 insertions, 11 deletions
diff --git a/Command/WebApp.hs b/Command/WebApp.hs index 20b914b7a..f143d8667 100644 --- a/Command/WebApp.hs +++ b/Command/WebApp.hs @@ -16,7 +16,6 @@ import Assistant.Threads.WebApp import Utility.WebApp import Utility.Daemon (checkDaemon, lockPidFile) import Init -import qualified Command.Watch import qualified Git.CurrentRepo import qualified Annex @@ -25,18 +24,14 @@ import Control.Concurrent.STM def :: [Command] def = [oneShot $ noRepo firstRun $ dontCheck repoExists $ - withOptions [Command.Watch.stopOption] $ command "webapp" paramNothing seek "launch webapp"] seek :: [CommandSeek] -seek = [withFlag Command.Watch.stopOption $ \stopdaemon -> - withNothing $ start stopdaemon] +seek = [withNothing start] -start :: Bool -> CommandStart -start stopdaemon = notBareRepo $ do - if stopdaemon - then stopDaemon - else ifM (isInitialized) ( go , liftIO firstRun ) +start :: CommandStart +start = notBareRepo $ do + ifM (isInitialized) ( go , liftIO firstRun ) stop where go = do diff --git a/doc/git-annex.mdwn b/doc/git-annex.mdwn index 282b1fda5..0a6df035b 100644 --- a/doc/git-annex.mdwn +++ b/doc/git-annex.mdwn @@ -192,8 +192,8 @@ subdirectories). * webapp - Opens a web browser, viewing the git-annex assistant's web app. - (If the assistant is not already running, it will be automatically started.) + Runs a web app, that allows easy setup of a git-annex repository, + and control of the git-annex assistant. # REPOSITORY SETUP COMMANDS |