Verified Commit 3d2313a7 authored by Camil Staps's avatar Camil Staps 🚀

Add missing imports of Data.Map.GenJSON

parent d16d056f
Pipeline #19517 passed with stage
in 4 minutes and 54 seconds
...@@ -8,6 +8,7 @@ import Incidone.OP.CommunicationManagementTasks ...@@ -8,6 +8,7 @@ import Incidone.OP.CommunicationManagementTasks
import Incidone.Util.TaskPatterns import Incidone.Util.TaskPatterns
import Text, Data.Either import Text, Data.Either
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
:: AsteriskEvent :== Map String String // Simple key/value mapping :: AsteriskEvent :== Map String String // Simple key/value mapping
......
...@@ -9,6 +9,7 @@ import Incidone.DeviceBased.VideoWall ...@@ -9,6 +9,7 @@ import Incidone.DeviceBased.VideoWall
import Incidone.Extensions.CrewLists //For demo import Incidone.Extensions.CrewLists //For demo
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import Text, Text.HTML, Data.Either, Data.Functor import Text, Text.HTML, Data.Either, Data.Functor
import iTasks.UI.Editor.Controls import iTasks.UI.Editor.Controls
......
...@@ -11,6 +11,7 @@ import Incidone.DeviceBased.VideoWall ...@@ -11,6 +11,7 @@ import Incidone.DeviceBased.VideoWall
import Incidone.ActionManagementTasks import Incidone.ActionManagementTasks
import Data.List, Data.Either import Data.List, Data.Either
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import Text.HTML import Text.HTML
openIncidentInWorkspace :: Workspace IncidentNo -> Task () openIncidentInWorkspace :: Workspace IncidentNo -> Task ()
......
...@@ -2,6 +2,7 @@ implementation module Incidone.OP.SDSs ...@@ -2,6 +2,7 @@ implementation module Incidone.OP.SDSs
import iTasks, iTasks.Extensions.SQLDatabase import iTasks, iTasks.Extensions.SQLDatabase
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import Incidone.Configuration import Incidone.Configuration
import Incidone.OP.Concepts, Incidone.OP.Conversions import Incidone.OP.Concepts, Incidone.OP.Conversions
import Incidone.Util.SQLSDS import Incidone.Util.SQLSDS
......
...@@ -5,6 +5,7 @@ import iTasks.UI.Definition ...@@ -5,6 +5,7 @@ import iTasks.UI.Definition
import Incidone.OP.IncidentManagementTasks, Incidone.OP.ContactManagementTasks import Incidone.OP.IncidentManagementTasks, Incidone.OP.ContactManagementTasks
import Text, Data.Functor, Data.Either, Data.Maybe import Text, Data.Functor, Data.Either, Data.Maybe
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import StdMisc import StdMisc
//FIXME //FIXME
......
...@@ -5,6 +5,7 @@ import iTasks.Extensions.SVG.SVGEditor ...@@ -5,6 +5,7 @@ import iTasks.Extensions.SVG.SVGEditor
//import Graphics.Scalable //import Graphics.Scalable
import qualified Data.List as DL import qualified Data.List as DL
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
import qualified Data.Set as DS import qualified Data.Set as DS
from Data.Func import mapSt from Data.Func import mapSt
......
...@@ -13,6 +13,7 @@ import C2.Framework.MapEnvironment ...@@ -13,6 +13,7 @@ import C2.Framework.MapEnvironment
import C2.Apps.ShipAdventure.Types import C2.Apps.ShipAdventure.Types
import C2.Apps.ShipAdventure.Images import C2.Apps.ShipAdventure.Images
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
import qualified Data.Set as DS import qualified Data.Set as DS
......
...@@ -7,6 +7,7 @@ import C2.Apps.ShipAdventure.PathFinding ...@@ -7,6 +7,7 @@ import C2.Apps.ShipAdventure.PathFinding
import C2.Apps.ShipAdventure.Util import C2.Apps.ShipAdventure.Util
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
// scripted simulation // scripted simulation
......
...@@ -12,6 +12,7 @@ import StdArray ...@@ -12,6 +12,7 @@ import StdArray
import Data.Data, Data.Either import Data.Data, Data.Either
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import qualified Data.Set as DS import qualified Data.Set as DS
import Text.HTML import Text.HTML
......
...@@ -4,6 +4,7 @@ import iTasks ...@@ -4,6 +4,7 @@ import iTasks
import StdReal, StdOverloaded import StdReal, StdOverloaded
import C2.Framework.GeoRoutines import C2.Framework.GeoRoutines
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
derive class iTask Entity, Position, RelPos, MovingPos, Structure, RectStruct, Behaviour, Angle derive class iTask Entity, Position, RelPos, MovingPos, Structure, RectStruct, Behaviour, Angle
......
...@@ -9,6 +9,7 @@ import iTasks.Extensions.Admin.TonicAdmin ...@@ -9,6 +9,7 @@ import iTasks.Extensions.Admin.TonicAdmin
import iTasks.Extensions.DateTime import iTasks.Extensions.DateTime
import qualified Data.Map as DM import qualified Data.Map as DM
from Data.Map import :: Map, instance Functor (Map k) from Data.Map import :: Map, instance Functor (Map k)
import Data.Map.GenJSON
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
from Data.IntMap.Strict import :: IntMap from Data.IntMap.Strict import :: IntMap
import qualified Data.Heap as DH import qualified Data.Heap as DH
......
...@@ -8,6 +8,7 @@ import qualified Data.Set as DS ...@@ -8,6 +8,7 @@ import qualified Data.Set as DS
from Data.IntMap.Strict import instance Functor IntMap from Data.IntMap.Strict import instance Functor IntMap
import qualified Data.IntMap.Strict as DIS import qualified Data.IntMap.Strict as DIS
import C2.Apps.ShipAdventure.Editor import C2.Apps.ShipAdventure.Editor
import Data.Map.GenJSON
dOffRegisterEntity :: [User -> Task Entity] dOffRegisterEntity :: [User -> Task Entity]
dOffRegisterEntity = [] dOffRegisterEntity = []
......
...@@ -10,6 +10,7 @@ import iTasks.Internal.Util ...@@ -10,6 +10,7 @@ import iTasks.Internal.Util
import StdFile import StdFile
from Data.Map import :: Map from Data.Map import :: Map
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import Data.Error, Data.Functor, Data.Maybe, Text import Data.Error, Data.Functor, Data.Maybe, Text
import System.Directory, System.File, System.FilePath, System.OS import System.Directory, System.File, System.FilePath, System.OS
......
...@@ -11,6 +11,7 @@ import iTasks.Extensions.Document ...@@ -11,6 +11,7 @@ import iTasks.Extensions.Document
import iTasks.Extensions.TextFile import iTasks.Extensions.TextFile
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import qualified Data.List as DL import qualified Data.List as DL
//* URL //* URL
......
...@@ -3,6 +3,7 @@ implementation module iTasks.Internal.Distributed.Instance ...@@ -3,6 +3,7 @@ implementation module iTasks.Internal.Distributed.Instance
import iTasks import iTasks
from Text import class Text, instance Text String from Text import class Text, instance Text String
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import qualified Text as T import qualified Text as T
import Text.Encodings.Base64 import Text.Encodings.Base64
import iTasks.Extensions.Distributed._Formatter import iTasks.Extensions.Distributed._Formatter
......
...@@ -8,6 +8,7 @@ import System.OS ...@@ -8,6 +8,7 @@ import System.OS
import Text, Text.HTML import Text, Text.HTML
import Data.List, Data.Func import Data.List, Data.Func
import qualified Data.Map as DM import qualified Data.Map as DM
import Data.Map.GenJSON
import Testing.TestEvents import Testing.TestEvents
import iTasks import iTasks
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment