Vergara_Tech/zgo-backend
Vergara_Tech/zgo-backend
2
1
Fork 0
Code Issues Pull requests Projects Releases 4 Packages Wiki Activity

Correct owner id in API

Browse source
This commit is contained in:
Rene Vergara 2023-05-10 14:16:33 -05:00
parent e1919be03a
commit 4e8ecb24e6
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/ZGoBackend.hs
View file

@ -920,7 +920,7 @@ routes pipe config = do
[ "message" .= ("Owner found!" :: String) [ "message" .= ("Owner found!" :: String)
, "owner" .= , "owner" .=
object object
[ "_id" .= (show $ o_id q :: String) [ "_id" .= (maybe "" show $ o_id q :: String)
, "address" .= oaddress q , "address" .= oaddress q
, "name" .= oname q , "name" .= oname q
, "currency" .= ocurrency q , "currency" .= ocurrency q
@ -952,7 +952,7 @@ routes pipe config = do
[ "message" .= ("Owner found!" :: String) [ "message" .= ("Owner found!" :: String)
, "owner" .= , "owner" .=
object object
[ "_id" .= (show $ o_id q :: String) [ "_id" .= (maybe "" show $ o_id q :: String)
, "address" .= oaddress q , "address" .= oaddress q
, "name" .= oname q , "name" .= oname q
, "currency" .= ocurrency q , "currency" .= ocurrency q