loafle/openapi-generator
3
0
Fork 0
forked from loafle/openapi-generator-original
Code Pull Requests Activity

[Haskell] fix use of isBasic condition (#15612)

Browse Source
This commit is contained in:
Tiffany Marrel 2023-05-24 10:58:46 +02:00 committed by GitHub
parent 3990b73ff3
commit 80c85eff1b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
modules/openapi-generator/src/main/resources/haskell-http-client/Model.mustache vendored
View File

@ -153,7 +153,7 @@ to{{{x-param-name-type}}} = \case{{#allowableValues}}{{#enumVars}}
{{#authMethods}}{{#-first}}-- * Auth Methods {{#authMethods}}{{#-first}}-- * Auth Methods
{{/-first}}{{#isBasic}}-- ** {{name}} {{/-first}}{{#isBasicBasic}}-- ** {{name}}
data {{name}} = data {{name}} =
{{name}} B.ByteString B.ByteString -- ^ username password {{name}} B.ByteString B.ByteString -- ^ username password
deriving (P.Eq, P.Show, P.Typeable) deriving (P.Eq, P.Show, P.Typeable)
@ -167,7 +167,7 @@ instance AuthMethod {{name}} where
else req else req
where cred = BC.append "Basic " (B64.encode $ BC.concat [ user, ":", pw ]) where cred = BC.append "Basic " (B64.encode $ BC.concat [ user, ":", pw ])
{{/isBasic}}{{#isApiKey}}-- ** {{name}} {{/isBasicBasic}}{{#isApiKey}}-- ** {{name}}
data {{name}} = data {{name}} =
{{name}} Text -- ^ secret {{name}} Text -- ^ secret
deriving (P.Eq, P.Show, P.Typeable) deriving (P.Eq, P.Show, P.Typeable)