diff options
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/NotifyChanges.hs | 2 | ||||
| -rw-r--r-- | Command/RemoteDaemon.hs | 24 |
2 files changed, 25 insertions, 1 deletions
diff --git a/Command/NotifyChanges.hs b/Command/NotifyChanges.hs index a1a076718..d0df05551 100644 --- a/Command/NotifyChanges.hs +++ b/Command/NotifyChanges.hs @@ -13,7 +13,7 @@ import Utility.DirWatcher import Utility.DirWatcher.Types import qualified Git import Git.Sha -import RemoteDaemon.EndPoint.GitAnnexShell.Types +import RemoteDaemon.Transport.Ssh.Types import Control.Concurrent import Control.Concurrent.Async diff --git a/Command/RemoteDaemon.hs b/Command/RemoteDaemon.hs new file mode 100644 index 000000000..61c3a7d84 --- /dev/null +++ b/Command/RemoteDaemon.hs @@ -0,0 +1,24 @@ +{- git-annex command + - + - Copyright 2014 Joey Hess <joey@kitenet.net> + - + - Licensed under the GNU GPL version 3 or higher. + -} + +module Command.RemoteDaemon where + +import Common.Annex +import Command +import RemoteDaemon.Core + +def :: [Command] +def = [noCommit $ command "remotedaemon" paramNothing seek SectionPlumbing + "detects when remotes have changed, and fetches from them"] + +seek :: CommandSeek +seek = withNothing start + +start :: CommandStart +start = do + liftIO runForeground + stop |