Commit 483bd3e5 authored by Alfredo Di Napoli's avatar Alfredo Di Napoli

Code review feedback

* Rename `exampleS` into `exampleSchema`;
* Revert commit about the public keys & co;
parent 18d207f0
Pipeline #7272 passed with stages
in 94 minutes and 14 seconds
......@@ -58,8 +58,8 @@ instance FromJSON RemoteExportRequest where
instance ToSchema RemoteExportRequest where
declareNamedSchema _ =
let exampleS = RemoteExportRequest (UnsafeMkNodeId 42) (BaseUrl Http "dev.sub.gargantext.org" 8008 "") ("abcdef")
in pure $ NamedSchema (Just "RemoteExportRequest") $ sketchStrictSchema exampleS
let exampleSchema = RemoteExportRequest (UnsafeMkNodeId 42) (BaseUrl Http "dev.sub.gargantext.org" 8008 "") ("abcdef")
in pure $ NamedSchema (Just "RemoteExportRequest") $ sketchStrictSchema exampleSchema
newtype RemoteBinaryData = RemoteBinaryData { getRemoteBinaryData :: BS.ByteString }
deriving (Show, Eq, Ord)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment