From 7e27a0a7eada373780a9757fd89f70d4d911d69a Mon Sep 17 00:00:00 2001
From: Julien Dessaux
Date: Fri, 22 Mar 2024 01:13:34 +0100
Subject: [haskell] refactoring

---
 haskell/src/SpaceTraders/Model/Nav.hs | 19 +++++++++----------
 1 file changed, 9 insertions(+), 10 deletions(-)

(limited to 'haskell/src/SpaceTraders/Model/Nav.hs')

diff --git a/haskell/src/SpaceTraders/Model/Nav.hs b/haskell/src/SpaceTraders/Model/Nav.hs
index 1c23ca1..8550836 100644
--- a/haskell/src/SpaceTraders/Model/Nav.hs
+++ b/haskell/src/SpaceTraders/Model/Nav.hs
@@ -1,20 +1,19 @@
 {-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE DeriveGeneric  #-}
 
 module SpaceTraders.Model.Nav
   ( Nav(..)
   ) where
 
-import Data.Aeson
-import GHC.Generics
-import qualified Data.Text as T
+import           Data.Aeson
+import qualified Data.Text                as T
+import           GHC.Generics
 
-import SpaceTraders.Model.Route
+import           SpaceTraders.Model.Route
 
-data Nav = Nav { flightMode :: T.Text
-               , route :: Route
-               , status :: T.Text
-               , systemSymbol :: T.Text
+data Nav = Nav { flightMode     :: T.Text
+               , route          :: Route
+               , status         :: T.Text
+               , systemSymbol   :: T.Text
                , waypointSymbol :: T.Text
                } deriving (FromJSON, Generic, Show, ToJSON)
-- 
cgit v1.2.3