diff options
| -rw-r--r-- | src/CabalHelper/Runtime/HelperMain.hs | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/src/CabalHelper/Runtime/HelperMain.hs b/src/CabalHelper/Runtime/HelperMain.hs index 5c84cd2..d3feea2 100644 --- a/src/CabalHelper/Runtime/HelperMain.hs +++ b/src/CabalHelper/Runtime/HelperMain.hs @@ -295,15 +295,11 @@ helper_main args = do let cmds = collectCmdOptions args' - if any (["version"] `isPrefixOf`) cmds - then do - putStrLn $ - printf "using version %s of the Cabal library" (display cabalVersion) - exitSuccess - else return () - flip mapM cmds $$ \x -> do case x of + "version":[] -> + return $ Just $ ChResponseVersion ("Cabal", toDataVersion cabalVersion) + "package-id":[] -> return $ Just $ ChResponseVersion $ (,) (display (packageName gpd)) |