2012-12-13 15:44:56 -04:00
|
|
|
{- git-annex command
|
|
|
|
-
|
2015-01-21 12:50:09 -04:00
|
|
|
- Copyright 2012 Joey Hess <id@joeyh.name>
|
2012-12-13 15:44:56 -04:00
|
|
|
-
|
2019-03-13 15:48:14 -04:00
|
|
|
- Licensed under the GNU AGPL version 3 or higher.
|
2012-12-13 15:44:56 -04:00
|
|
|
-}
|
|
|
|
|
|
|
|
module Command.Indirect where
|
|
|
|
|
|
|
|
import Command
|
|
|
|
|
2015-07-08 12:33:27 -04:00
|
|
|
cmd :: Command
|
|
|
|
cmd = notBareRepo $ noDaemonRunning $
|
2019-08-26 14:52:55 -04:00
|
|
|
command "indirect" SectionSetup "switch repository to indirect mode (deprecated)"
|
2015-07-08 15:08:02 -04:00
|
|
|
paramNothing (withParams seek)
|
2012-12-13 15:44:56 -04:00
|
|
|
|
2015-07-08 15:08:02 -04:00
|
|
|
seek :: CmdParams -> CommandSeek
|
2018-10-01 14:12:06 -04:00
|
|
|
seek = withNothing (commandAction start)
|
2012-12-13 15:44:56 -04:00
|
|
|
|
|
|
|
start :: CommandStart
|
2019-08-26 14:52:55 -04:00
|
|
|
start = stop
|