cabalSandbox_ :: CabalNew -> T.Text -> [T.Text] -> Sh ()
cabalSandbox_ c cmdName args =
    command1_ (cabalCmd c) [] "sandbox" $ cmdName : args
cabalSandbox_ :: CabalNew -> T.Text -> [T.Text] -> Sh ()
cabalSandbox_ c cmdName args =
    command1_ (cabalCmd c) [] "sandbox" $ cmdName : args
cabalSandbox_ c cmdName args =
    command1_ (cabalCmd c) [] "sandbox" $ cmdName : args