Packages

arctic

6.0.0
11.0.10 11.0.9 11.0.8 11.0.7 11.0.6 11.0.6-z6 11.0.6-z5 11.0.6-z4 11.0.6-z3 11.0.6-z2 11.0.6-z1 11.0.6-gamma 11.0.6-delta 11.0.6-beta 11.0.6-alpha 11.0.5 11.0.4 11.0.3 11.0.2 11.0.1 11.0.0 11.0.0-alpha5 11.0.0-alpha4 11.0.0-alpha3 11.0.0-alpha2 11.0.0-alpha 10.0.1 10.0.0 10.0.0-alpha2 10.0.0-alpha 9.0.5 9.0.4 9.0.3 9.0.2 9.0.0 8.0.0 7.0.0 6.0.0 5.0.0 4.0.0 3.0.0 2.0.0 1.0.1 1.0.0

A friendly web framework for fast response times and a lightweight or serverless backend, written in Gleam!

HexDocs

Current section

Files

Jump to
Readme
44 Versions
6 Dependencies
Dependants
Files
Activity
arctic src arctic@page.erl
Raw

src/arctic@page.erl 

-module(arctic@page).

-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).



-export([new/1, with_html/2, with_metadata/3, replace_metadata/2, with_title/2, with_blerb/2, with_tags/2, with_date/2]).



-spec new(binary()) -> arctic:page().

new(Id) ->

    {page,

        Id,

        lustre@element@html:html(

            [],

            [lustre@element@html:head([], []), lustre@element@html:body([], [])]

        ),

        gleam@dict:new(),

        <<""/utf8>>,

        <<""/utf8>>,

        [],

        none}.



-spec with_html(arctic:page(), lustre@internals@vdom:element(nil)) -> arctic:page().

with_html(P, Html) ->

    {page,

        erlang:element(2, P),

        Html,

        erlang:element(4, P),

        erlang:element(5, P),

        erlang:element(6, P),

        erlang:element(7, P),

        erlang:element(8, P)}.



-spec with_metadata(arctic:page(), binary(), binary()) -> arctic:page().

with_metadata(P, Key, Val) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        gleam@dict:insert(erlang:element(4, P), Key, Val),

        erlang:element(5, P),

        erlang:element(6, P),

        erlang:element(7, P),

        erlang:element(8, P)}.



-spec replace_metadata(arctic:page(), gleam@dict:dict(binary(), binary())) -> arctic:page().

replace_metadata(P, Metadata) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        Metadata,

        erlang:element(5, P),

        erlang:element(6, P),

        erlang:element(7, P),

        erlang:element(8, P)}.



-spec with_title(arctic:page(), binary()) -> arctic:page().

with_title(P, Title) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        erlang:element(4, P),

        Title,

        erlang:element(6, P),

        erlang:element(7, P),

        erlang:element(8, P)}.



-spec with_blerb(arctic:page(), binary()) -> arctic:page().

with_blerb(P, Blerb) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        erlang:element(4, P),

        erlang:element(5, P),

        Blerb,

        erlang:element(7, P),

        erlang:element(8, P)}.



-spec with_tags(arctic:page(), list(binary())) -> arctic:page().

with_tags(P, Tags) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        erlang:element(4, P),

        erlang:element(5, P),

        erlang:element(6, P),

        Tags,

        erlang:element(8, P)}.



-spec with_date(arctic:page(), birl:time()) -> arctic:page().

with_date(P, Date) ->

    {page,

        erlang:element(2, P),

        erlang:element(3, P),

        erlang:element(4, P),

        erlang:element(5, P),

        erlang:element(6, P),

        erlang:element(7, P),

        {some, Date}}.