From ec2967aab36020c9ea3d8a88877bd448e3b06d40 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Tue, 26 Mar 2019 18:53:44 +0100 Subject: [Broken] ... --- src/battle/src/View/Controlled/CharacterCard.elm | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) (limited to 'src/battle') diff --git a/src/battle/src/View/Controlled/CharacterCard.elm b/src/battle/src/View/Controlled/CharacterCard.elm index c3d1daf..785cc02 100644 --- a/src/battle/src/View/Controlled/CharacterCard.elm +++ b/src/battle/src/View/Controlled/CharacterCard.elm @@ -43,7 +43,7 @@ import View.Character -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- get_name : ( - Struct.Character.Type -> + BattleCharacters.Struct.Character.Type -> (Html.Html Struct.Event.Type) ) get_name char = @@ -54,11 +54,7 @@ get_name char = (Html.Attributes.class "character-card-name") ] [ - (Html.text - (BattleCharacters.Struct.Character.get_name - (Struct.Character.get_base_character char) - ) - ) + (Html.text (BattleCharacters.Struct.Character.get_name char)) ] ) @@ -348,6 +344,7 @@ get_minimal_html : ( (Html.Html Struct.Event.Type) ) get_minimal_html player_ix char = + let base_char = (Struct.Character.get_base_character char) in (Html.div [ (Html.Attributes.class "info-card"), @@ -356,7 +353,7 @@ get_minimal_html player_ix char = (Html.Attributes.class "character-card-minimal") ] [ - (get_name char), + (get_name base_char), (Html.div [ (Html.Attributes.class "info-card-top"), @@ -471,7 +468,7 @@ get_full_html player_ix char = (Html.Attributes.class "character-card") ] [ - (get_name char), + (get_name base_char), (Html.div [ (Html.Attributes.class "info-card-top"), -- cgit v1.2.3-70-g09d2