Add option to specify cabal-dev sandbox explicitly.

2012-04-09 20:39:58 +01:00
parent cdd8eb71a3
commit b0cabae366
3 changed files with 16 additions and 3 deletions
--- a/GHCMod.hs
+++ b/GHCMod.hs
@@ -57,6 +57,9 @@ argspec = [ Option "l" ["tolisp"]
          , Option "o" ["operators"]
            (NoArg (\opts -> opts { operators = True }))
            "print operators, too"
+          , Option "s" ["sandbox"]
+            (ReqArg (\s opts -> opts { sandbox = Just s }) "path")
+            "specify cabal-dev sandbox (default 'cabal-dev`)"
          ]

 parseArgs :: [OptDescr (Options -> Options)] -> [String] -> (Options, [String])