Support modifying reuploaded tarballs
This commit is contained in:
@@ -17,10 +17,8 @@ data Settings = Settings
|
||||
, maintainer :: MaintainerSettings
|
||||
} deriving (Eq, Show)
|
||||
|
||||
data MaintainerSettings = MaintainerSettings
|
||||
{ name :: !Text
|
||||
, email :: !Text
|
||||
, signature :: !Bool
|
||||
newtype MaintainerSettings = MaintainerSettings
|
||||
{ signature :: Bool
|
||||
} deriving (Eq, Show)
|
||||
|
||||
settingsCodec :: Toml.TomlCodec Settings
|
||||
@@ -34,6 +32,4 @@ settingsCodec = Settings
|
||||
|
||||
maintainerSettingsCodec :: Toml.TomlCodec MaintainerSettings
|
||||
maintainerSettingsCodec = MaintainerSettings
|
||||
<$> Toml.text "name" .= name
|
||||
<*> Toml.text "email" .= email
|
||||
<*> Toml.bool "signature" .= signature
|
||||
<$> Toml.bool "signature" .= signature
|
||||
|
Reference in New Issue
Block a user