summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2019-03-27 18:24:38 +0100
committerNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2019-03-27 18:24:38 +0100
commit6ca8f6fbb8083db156c906e848173e827de838ef (patch)
tree3e887472de809bf8a2210a28e892c9d8782d75b8 /src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
parent4dcb831ddc1f30251b302b129a18c4e08b276989 (diff)
It compiles again!
Diffstat (limited to 'src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm')
-rw-r--r--src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm b/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
index 0aff932..cea3b0f 100644
--- a/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
+++ b/src/shared/battle-characters/BattleCharacters/Struct/Weapon.elm
@@ -2,6 +2,7 @@ module BattleCharacters.Struct.Weapon exposing
(
Type,
Ref,
+ find,
get_id,
get_name,
get_is_primary,
@@ -15,6 +16,8 @@ module BattleCharacters.Struct.Weapon exposing
)
-- Elm -------------------------------------------------------------------------
+import Dict
+
import Json.Decode
import Json.Decode.Pipeline
@@ -44,6 +47,12 @@ type alias Ref = String
--------------------------------------------------------------------------------
-- EXPORTED --------------------------------------------------------------------
--------------------------------------------------------------------------------
+find : (Dict.Dict Ref Type) -> Ref -> Type
+find dict ref =
+ case (Dict.get ref dict) of
+ (Just e) -> e
+ Nothing -> none
+
get_id : Type -> String
get_id wp = wp.id