diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-06-30 13:22:10 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-06-30 13:22:10 -0400 |
| commit | 0f2859454cb1d1edd779fccd9b35e2b5d78b0861 (patch) | |
| tree | 7b7c3c7b0fd98cd78e4eeecb96bcdb89c3a828db | |
| parent | f6063a094ec02caec314b42dc05f2f0595ae0ce4 (diff) | |
tweak
| -rw-r--r-- | git-annex-shell.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/git-annex-shell.hs b/git-annex-shell.hs index c240b1c19..a64552c72 100644 --- a/git-annex-shell.hs +++ b/git-annex-shell.hs @@ -35,9 +35,7 @@ header :: String header = "Usage: git-annex-shell [-c] command [parameters ...] [option ..]" main :: IO () -main = do - args <- getArgs - main' args +main = main' =<< getArgs main' :: [String] -> IO () main' [] = failure |