nakai

-module(nakai@head).
-compile(no_auto_import).

-export([stylesheet/1, title/1, link/2, meta/2, charset/1]).

-spec stylesheet(binary()) -> nakai@html:node_(any()).
stylesheet(Url) ->
    nakai@html:head(
        [nakai@html:link(
             [nakai@html@attrs:rel(<<"stylesheet"/utf8>>),
              nakai@html@attrs:href(Url)]
         )]
    ).

-spec title(binary()) -> nakai@html:node_(any()).
title(Title) ->
    nakai@html:head([nakai@html:title([], [{text, Title}])]).

-spec link(binary(), binary()) -> nakai@html:node_(any()).
link(Rel, Href) ->
    nakai@html:head(
        [nakai@html:link(
             [nakai@html@attrs:rel(Rel), nakai@html@attrs:href(Href)]
         )]
    ).

-spec meta(binary(), binary()) -> nakai@html:node_(any()).
meta(Name, Content) ->
    nakai@html:head(
        [nakai@html:meta(
             [nakai@html@attrs:name(Name), nakai@html@attrs:content(Content)]
         )]
    ).

-spec charset(binary()) -> nakai@html:node_(any()).
charset(Charset) ->
    nakai@html:head([nakai@html:meta([nakai@html@attrs:charset(Charset)])]).