diff options
author | Julien Dessaux | 2023-10-14 23:59:32 +0200 |
---|---|---|
committer | Julien Dessaux | 2023-10-16 23:33:36 +0200 |
commit | 0ecb8e87c0ab3448accbbdf58551f51969999bdb (patch) | |
tree | aa3e54a01483e4265424cd454b37fa0742bb424f /haskell/src/SpaceTraders/Model | |
parent | [javascript] Upgraded dependencies (diff) | |
download | spacetraders-0ecb8e87c0ab3448accbbdf58551f51969999bdb.tar.gz spacetraders-0ecb8e87c0ab3448accbbdf58551f51969999bdb.tar.bz2 spacetraders-0ecb8e87c0ab3448accbbdf58551f51969999bdb.zip |
[haskell] Removed available timestamp from ship's database schema
Diffstat (limited to '')
-rw-r--r-- | haskell/src/SpaceTraders/Model/Waypoint.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/haskell/src/SpaceTraders/Model/Waypoint.hs b/haskell/src/SpaceTraders/Model/Waypoint.hs index 458df21..b32af75 100644 --- a/haskell/src/SpaceTraders/Model/Waypoint.hs +++ b/haskell/src/SpaceTraders/Model/Waypoint.hs @@ -22,7 +22,7 @@ instance FromJSON Waypoint where <*> o .: "x" <*> o .: "y" instance ToJSON Waypoint where - toJSON (Waypoint s t xx yy) = object [ "symbol" .= s - , "type" .= t - , "x" .= xx - , "y" .= yy ] + toJSON (Waypoint o s t xx yy) = object [ "symbol" .= s + , "type" .= t + , "x" .= xx + , "y" .= yy ] |