niv-0.2.17: src/Niv/Cmd.hs

{-# LANGUAGE RankNTypes #-}

module Niv.Cmd where

import qualified Data.Aeson as Aeson
import qualified Data.Text as T
import Niv.Sources
import Niv.Update
import qualified Options.Applicative as Opts

-- TODO: add filter
data Cmd
  = Cmd
      { description :: forall a. Opts.InfoMod a,
        parseCmdShortcut :: T.Text -> Maybe (PackageName, Aeson.Object),
        parsePackageSpec :: Opts.Parser PackageSpec,
        updateCmd :: Update () (),
        name :: T.Text,
        -- | Some notes to print
        extraLogs :: Attrs -> [T.Text]
      }