Add "About" and "Legal" sections

Changes

3 changed files (+84/-7)

• build.zig
  • @@ -74,6 +74,8 @@ _ = dir.addCopyDirectory(b.path("vendor/barlow"), "vendor/barlow", .{});
    _ = dir.addCopyDirectory(b.path("vendor/Inter"), "vendor/Inter", .{}); _ = dir.addCopyFile(elm_main.generateThirdPartyLicenseText(), "licenses/third-party.txt"); + _ = dir.addCopyFile(b.path("LICENSES/MPL-2.0.txt"), "licenses/MPL-2.0.txt"); + _ = dir.addCopyFile(b.path("LICENSES/OFL-1.1-no-RFN.txt"), "licenses/OFL-1.1-no-RFN.txt"); break :dist dir; };
• src/Main.elm
  • @@ -11,8 +11,8 @@ module Main exposing (main)
    import Browser import Browser.Navigation exposing (Key) - import Html exposing (hr, node, p) - import Html.Attributes exposing (attribute) + import Html exposing (a, hr, node, p, span, text) + import Html.Attributes exposing (attribute, href) import Html.LivingStandard exposing (..) import Json.Decode import Parameters
  • @@ -112,7 +112,11 @@ |> Tuple.mapFirst (\p -> { model | preferences = p })
    |> Tuple.mapSecond (Cmd.map PreferencesMsg) UrlRequested (Browser.Internal url) -> - ( model, Browser.Navigation.replaceUrl model.key (Url.toString url) ) + if String.endsWith ".txt" url.path then + ( model, Browser.Navigation.load (Url.toString url) ) + + else + ( model, Browser.Navigation.replaceUrl model.key (Url.toString url) ) UrlRequested (Browser.External href) -> ( model, Browser.Navigation.load href )
  • @@ -169,12 +173,76 @@ , node "x-panel"
    [ slot "parameters" ] [ node "x-parameters" [] - ((Parameters.App.view - model.parameters - |> List.map (Html.map ParametersMsg) - ) + (node "x-field-group" + [] + [ span [ slot "title" ] [ text "About" ] + , node "x-field" + [] + [ span [ slot "title" ] [ text "This Software" ] + , p [ slot "description" ] + [ text "This application lets you build a leather craft template for basic watch straps." + ] + ] + , node "x-field" + [] + [ span [ slot "title" ] [ text "The Template" ] + , p [ slot "description" ] + [ text "The template this application outputs is for two-parts leather wrist warch strap. " + , text "It assumes you use a lining leather and a clasp / buckle. " + ] + , p [ slot "description" ] + [ text "The output is provided as-is. How to use the template is completely on your own." + ] + ] + , node "x-field" + [] + [ span [ slot "title" ] [ text "Author" ] + , p [ slot "description" ] + [ text "© Shota FUJI, licensed under the " + , a [ href "/licenses/MPL-2.0.txt" ] [ text "Mozilla Public License version 2.0" ] + , text "." + ] + ] + ] + :: hr [] [] + :: (Parameters.App.view model.parameters |> List.map (Html.map ParametersMsg)) ++ hr [] [] :: (Preferences.App.panelItems model.preferences |> List.map (Html.map PreferencesMsg)) + ++ [ hr [] [] + , node "x-field-group" + [] + [ span [ slot "title" ] [ text "Legal" ] + , node "x-field" + [] + [ span [ slot "title" ] [ text "Third-party Fonts" ] + , p [ slot "description" ] [ text "This application uses these fonts:" ] + , Html.ul + [ slot "description" ] + [ Html.li [] + [ a [ href "https://github.com/jpt/barlow" ] [ text "Barlow" ] + , text " (Copyright 2017 The Barlow Project Authors (https://github.com/jpt/barlow), licensed under " + , a [ href "/licenses/OFL-1.1-no-RFN.txt" ] [ text "SIL Open Font License, Version 1.1" ] + , text ")" + ] + , Html.li [] + [ a [ href "https://rsms.me/inter/" ] [ text "Inter UI" ] + , text " (Copyright (c) 2016 The Inter Project Authors (https://github.com/rsms/inter), licensed under " + , a [ href "/licenses/OFL-1.1-no-RFN.txt" ] [ text "SIL Open Font License, Version 1.1" ] + , text ")" + ] + ] + ] + , node "x-field" + [] + [ span [ slot "title" ] [ text "Third-party Softwares" ] + , p [ slot "description" ] + [ text "See " + , a [ href "/licenses/third-party.txt" ] [ text "third-party.txt" ] + , text " for list of third-party softwares and its license text." + ] + ] + ] + ] ) ] ]
• src/elements/x-field.css
  • @@ -43,6 +43,13 @@
    opacity: 0.9; } + ::slotted(ul[slot="description"]) { + padding-inline-start: 1em; + display: flex; + flex-direction: column; + gap: 1em; + } + ::slotted([slot="error"]) { padding-bottom: 0; min-height: 1.75em;