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/APIClient/Ships.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'haskell/src/SpaceTraders/APIClient/Ships.hs')

diff --git a/haskell/src/SpaceTraders/APIClient/Ships.hs b/haskell/src/SpaceTraders/APIClient/Ships.hs
index f4b7290..87c5ecb 100644
--- a/haskell/src/SpaceTraders/APIClient/Ships.hs
+++ b/haskell/src/SpaceTraders/APIClient/Ships.hs
@@ -29,7 +29,7 @@ dock ship = do
     Left e -> return $ Left e
     Right (NavMessage n) -> do
       let s = ship{SpaceTraders.Model.Ship.nav=n}
-      updateShip s Nothing
+      updateShip s
       return $ Right s
 
 myShips :: SpaceTradersT (APIResponse [Ship])
@@ -55,5 +55,5 @@ orbit ship = do
     Left e -> return $ Left e
     Right (NavMessage n) -> do
       let s = ship{SpaceTraders.Model.Ship.nav=n}
-      updateShip s Nothing
+      updateShip s
       return $ Right s
-- 
cgit v1.2.3