X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=utils%2Fghc-cabal%2FMain.hs;h=23d04cc47ad0e61a804ef1205198189e4e90b415;hp=81b47db65945adc2289a64ef384824a1de717852;hb=7d0a6701279ac802d302b934e616d6c8169d3c4d;hpb=cdeb8a20af8c0ea129a5617aa576dc40fb3f3fd2 diff --git a/utils/ghc-cabal/Main.hs b/utils/ghc-cabal/Main.hs index 81b47db..23d04cc 100644 --- a/utils/ghc-cabal/Main.hs +++ b/utils/ghc-cabal/Main.hs @@ -46,6 +46,8 @@ main = do args <- getArgs _ -> die syntax_error "sdist" : dir : distDir : [] -> doSdist dir distDir + ["--version"] -> + defaultMainArgs ["--version"] _ -> die syntax_error syntax_error :: [String]