opt-env-conf-test-0.0.0.3: test_resources/docs/secret/show.txt
WithConfig
_
Nothing
(Pure _)
(Ap
(Ap
(Ap
(Ap
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[ DashedLong ('f' :| "irst-secret-file") ]
[ _ ]
False
Nothing
True
(Just
(EnvVarSetting
{ envVarSettingVar = "FIRST_SECRET_FILE"
, envVarSettingAllowPrefix = True
} :|
[]))
(Just
(ConfigValSetting
("first-secret-file" :| [])
BimapCodec
_
_
(EitherCodec
PossiblyJointUnion
NullCodec
(BimapCodec _ _ (StringCodec Nothing))) :|
[]))
Nothing
[]
False
(Just "FILE_PATH")
(Just "First example secret")
(Just _)
(fromList [])))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[ DashedLong ('s' :| "econd-secret") ]
[ _ , _ ]
False
Nothing
True
Nothing
Nothing
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file")
Nothing
(fromList []))))
(Alt
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[ DashedLong ('s' :| "econd-secret-file") ]
[ _ , _ ]
False
Nothing
True
Nothing
Nothing
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file")
Nothing
(fromList [])))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
(Just
(EnvVarSetting
{ envVarSettingVar = "SECOND_SECRET"
, envVarSettingAllowPrefix = True
} :|
[]))
Nothing
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file")
Nothing
(fromList []))))
(Alt
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
(Just
(EnvVarSetting
{ envVarSettingVar = "SECOND_SECRET_FILE"
, envVarSettingAllowPrefix = True
} :|
[]))
Nothing
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file")
Nothing
(fromList [])))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
Nothing
(Just
(ConfigValSetting
("second-secret" :| [])
BimapCodec
_
_
(EitherCodec
PossiblyJointUnion
NullCodec
(BimapCodec _ _ (StringCodec Nothing))) :|
[]))
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file")
Nothing
(fromList []))))
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
Nothing
(Just
(ConfigValSetting
("second-secret-file" :| [])
BimapCodec
_
_
(EitherCodec
PossiblyJointUnion
NullCodec
(BimapCodec _ _ (StringCodec Nothing))) :|
[]))
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file")
Nothing
(fromList [])))))))))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[ DashedLong ('s' :| "econd-secret") ]
[ _ , _ ]
False
Nothing
True
Nothing
Nothing
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file, only option")
Nothing
(fromList []))))
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[ DashedLong ('s' :| "econd-secret-file") ]
[ _ , _ ]
False
Nothing
True
Nothing
Nothing
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file, only option")
Nothing
(fromList [])))))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
(Just
(EnvVarSetting
{ envVarSettingVar = "second-secret"
, envVarSettingAllowPrefix = True
} :|
[]))
Nothing
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file, only env")
Nothing
(fromList []))))
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
(Just
(EnvVarSetting
{ envVarSettingVar = "second-secret_FILE"
, envVarSettingAllowPrefix = True
} :|
[]))
Nothing
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file, only env")
Nothing
(fromList [])))))))
(Alt
(Check
Nothing
True
(fromList [ "read-secret" ])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
Nothing
(Just
(ConfigValSetting
("second-secret" :| [])
BimapCodec
_
_
(EitherCodec
PossiblyJointUnion
NullCodec
(BimapCodec _ _ (StringCodec Nothing))) :|
[]))
Nothing
[]
False
(Just "SECRET")
(Just "Second example secret, bare or in a file, only conf")
Nothing
(fromList []))))
(Check
Nothing
False
(fromList [ "read-secret" ])
_
(Check
Nothing
False
(fromList [])
_
(Setting
Nothing
(Setting
[]
[ _ , _ ]
False
Nothing
False
Nothing
(Just
(ConfigValSetting
("second-secret-file" :| [])
BimapCodec
_
_
(EitherCodec
PossiblyJointUnion
NullCodec
(BimapCodec _ _ (StringCodec Nothing))) :|
[]))
Nothing
[]
False
(Just "FILE_PATH")
(Just "Second example secret, bare or in a file, only conf")
Nothing
(fromList [])))))))