git-annex/git-annex-shell.hs

{- git-annex-shell main program
 -
 - Copyright 2012 Joey Hess <joey@kitenet.net>
 -
 - Licensed under the GNU GPL version 3 or higher.
 -}

import System.Environment

import GitAnnexShell

main :: IO ()
main = run =<< getArgs
add git-annex-shell command This is not yet complete, as it does not allow starting rsync or scp. 2010-12-30 20:52:24 +00:00			`{- git-annex-shell main program`
			`-`
shave some 12 mb from the installed size * git-annex now behaves as git-annex-shell if symlinked to and run by that name. The Makefile sets this up, saving some 8 mb of installed size. * git-union-merge is a demo program, so it is no longer built by default. 2012-03-15 16:00:19 +00:00			`- Copyright 2012 Joey Hess <joey@kitenet.net>`
add git-annex-shell command This is not yet complete, as it does not allow starting rsync or scp. 2010-12-30 20:52:24 +00:00			`-`
			`- Licensed under the GNU GPL version 3 or higher.`
			`-}`

			`import System.Environment`

shave some 12 mb from the installed size * git-annex now behaves as git-annex-shell if symlinked to and run by that name. The Makefile sets this up, saving some 8 mb of installed size. * git-union-merge is a demo program, so it is no longer built by default. 2012-03-15 16:00:19 +00:00			`import GitAnnexShell`
add git-annex-shell command This is not yet complete, as it does not allow starting rsync or scp. 2010-12-30 20:52:24 +00:00
			`main :: IO ()`
shave some 12 mb from the installed size * git-annex now behaves as git-annex-shell if symlinked to and run by that name. The Makefile sets this up, saving some 8 mb of installed size. * git-union-merge is a demo program, so it is no longer built by default. 2012-03-15 16:00:19 +00:00			`main = run =<< getArgs`