From ce51aee1d54243de2b682effccd6adf67ab6d587 Mon Sep 17 00:00:00 2001 From: DieMyst Date: Wed, 2 Dec 2020 17:55:07 +0300 Subject: [PATCH] change font weight, improve interface styles --- index.html | 2 +- src/BlueprintPage/View.elm | 8 ++++---- src/Interface/View.elm | 6 +++--- src/ModulePage/View.elm | 4 ++-- 4 files changed, 10 insertions(+), 10 deletions(-) diff --git a/index.html b/index.html index bb784a5..c3cf464 100644 --- a/index.html +++ b/index.html @@ -3,7 +3,7 @@ - + diff --git a/src/BlueprintPage/View.elm b/src/BlueprintPage/View.elm index d9ffa55..7d329d3 100644 --- a/src/BlueprintPage/View.elm +++ b/src/BlueprintPage/View.elm @@ -6,7 +6,7 @@ import Dict exposing (Dict) import Html exposing (Html, article, div, h3, span, text) import Html.Events exposing (onClick) import Instances.View -import Interface.View exposing (instanceView) +import Interface.View exposing (interfaceView) import Model exposing (Model) import Modules.Model exposing (Module) import Msg exposing (Msg(..)) @@ -92,9 +92,9 @@ viewInfo blueprintInfo = viewToggledInterface : Bool -> String -> Interface -> Html Msg viewToggledInterface isOpen name interface = let - interfaceView = + interfaceViewEl = if isOpen then - [ div [ classes "fl w-100 ph4" ] (instanceView interface) ] + [ div [ classes "fl w-100 ph4" ] (interfaceView interface) ] else [] @@ -111,5 +111,5 @@ viewToggledInterface isOpen name interface = ] ] ] - ++ interfaceView + ++ interfaceViewEl ) diff --git a/src/Interface/View.elm b/src/Interface/View.elm index 81dbbda..9a2f5f9 100644 --- a/src/Interface/View.elm +++ b/src/Interface/View.elm @@ -6,8 +6,8 @@ import Service.Model exposing (Interface, Record, Signature) import String.Interpolate exposing (interpolate) -instanceView : Interface -> List (Html msg) -instanceView interface = +interfaceView : Interface -> List (Html msg) +interfaceView interface = recordsView interface.record_types ++ signaturesView interface.function_signatures @@ -38,7 +38,7 @@ signaturesView signatures = signatureView : Signature -> Html msg signatureView signature = div [ classes "i fl w-100 mv2" ] - [ text (interpolate "fn {0}({1}) -> {2}" [ signature.name, argumentsToString signature.arguments, outputToString signature.output_types ]) ] + [ text "fn ", span [classes "b"] [text signature.name], text (interpolate "({0}) -> {1}" [ argumentsToString signature.arguments, outputToString signature.output_types ]) ] argumentsToString : List (List String) -> String diff --git a/src/ModulePage/View.elm b/src/ModulePage/View.elm index 49c27c8..194f3d7 100644 --- a/src/ModulePage/View.elm +++ b/src/ModulePage/View.elm @@ -3,7 +3,7 @@ module ModulePage.View exposing (..) import Dict exposing (Dict) import Html exposing (Html, article, div, h3, span, text) import Instances.View -import Interface.View exposing (instanceView) +import Interface.View exposing (interfaceView) import Model exposing (Model) import ModulePage.Model exposing (ModuleViewInfo) import Modules.Model exposing (Module) @@ -77,5 +77,5 @@ viewInfo moduleInfo = , div [ classes "fl w-30 gray mv1" ] [ text "DESCRIPTION" ] , div [ classes "fl w-70 mv1" ] [ span [ classes "fl w-100 black" ] [ text moduleInfo.description ] ] , div [ classes "fl w-30 gray mv1" ] [ text "INTERFACE" ] - , div [ classes "fl w-70 mv1" ] [ span [ classes "fl w-100 black" ] (instanceView moduleInfo.moduleInfo.interface) ] + , div [ classes "fl w-70 mv1" ] [ span [ classes "fl w-100 black" ] (interfaceView moduleInfo.moduleInfo.interface) ] ]