facebook/duckling
1
1
Fork 0
mirror of https://github.com/facebook/duckling.git synced 2024-08-17 17:20:55 +03:00
Code Issues Packages Projects Releases Wiki Activity

Add type=value to JSON response for Email, PhoneNumber and Url

Browse Source 
Summary: For consistency.

Reviewed By: jtliao

Differential Revision: D20524369

fbshipit-source-id: 44031667adccab9bca7b3b6d42c80878bb96ccae
This commit is contained in:
Julien Odent 2020-03-18 16:57:04 -07:00 committed by Facebook GitHub Bot
parent 5d6750208a
commit 7166286a6f
3 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Duckling/Email/Types.hs
View File

@ -31,4 +31,7 @@ instance Resolve EmailData where
resolve _ _ x = Just (x, False)
instance ToJSON EmailData where
toJSON EmailData {value} = object [ "value" .= value ]
toJSON EmailData {value} = object
[ "value" .= value
, "type" .= ("value" :: Text)
]

5
Duckling/PhoneNumber/Types.hs
View File

@ -50,4 +50,7 @@ data PhoneNumberValue = PhoneNumberValue { value :: Text }
deriving (Eq, Ord, Show)
instance ToJSON PhoneNumberValue where
toJSON (PhoneNumberValue value) = object [ "value" .= value ]
toJSON (PhoneNumberValue value) = object
[ "value" .= value
, "type" .= ("value" :: Text)
]

1
Duckling/Url/Types.hs
View File

@ -38,4 +38,5 @@ instance ToJSON UrlData where
toJSON (UrlData value domain) = object
[ "value" .= value
, "domain" .= domain
, "type" .= ("value" :: Text)
]