module Shrun.Configuration.Args
  ( Args (..),
    defaultArgs,
  )
where

import Shrun.Configuration.Args.Parsing
  ( Args
      ( MkArgs,
        commands,
        configPath,
        coreConfig
      ),
  )
import Shrun.Configuration.Default (Default (def))
import Shrun.Prelude

defaultArgs :: NESeq Text -> Args
defaultArgs :: NESeq Text -> Args
defaultArgs NESeq Text
commands =
  MkArgs
    { configPath :: WithDisabled OsPath
configPath = WithDisabled OsPath
forall a. Monoid a => a
mempty,
      coreConfig :: CoreConfigArgs
coreConfig = CoreConfigArgs
forall a. Default a => a
def,
      NESeq Text
commands :: NESeq Text
commands :: NESeq Text
commands
    }