From 0ecb8e87c0ab3448accbbdf58551f51969999bdb Mon Sep 17 00:00:00 2001
From: Julien Dessaux
Date: Sat, 14 Oct 2023 23:59:32 +0200
Subject: [haskell] Removed available timestamp from ship's database schema

---
 haskell/src/SpaceTraders/Model/Waypoint.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'haskell/src/SpaceTraders/Model')

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 ]
-- 
cgit v1.2.3