nitro/src/elements/element_area.erl

-module(element_area).
-author('Vladimir Galunshchikov').
-include_lib("nitro/include/nitro.hrl").
-compile(export_all).

render_element(Record) when Record#area.show_if==false -> [<<>>];
render_element(Record) ->
    List = [
      %global
      {<<"accesskey">>, Record#area.accesskey},
      {<<"class">>, Record#area.class},
      {<<"contenteditable">>, case Record#area.contenteditable of true -> "true"; false -> "false"; _ -> [] end},
      {<<"contextmenu">>, Record#area.contextmenu},
      {<<"dir">>, case Record#area.dir of "ltr" -> "ltr"; "rtl" -> "rtl"; "auto" -> "auto"; _ -> [] end},
      {<<"draggable">>, case Record#area.draggable of true -> "true"; false -> "false"; _ -> [] end},
      {<<"dropzone">>, Record#area.dropzone},
      {<<"hidden">>, case Record#area.hidden of "hidden" -> "hidden"; _ -> [] end},
      {<<"id">>, Record#area.id},
      {<<"lang">>, Record#area.lang},
      {<<"spellcheck">>, case Record#area.spellcheck of true -> "true"; false -> "false"; _ -> [] end},
      {<<"style">>, Record#area.style},
      {<<"tabindex">>, Record#area.tabindex},
      {<<"title">>, Record#area.title},
      {<<"translate">>, case Record#area.contenteditable of "yes" -> "yes"; "no" -> "no"; _ -> [] end},      
      % spec
      {<<"alt">>,Record#area.alt},
      {<<"coords">>,Record#area.coords},
      {<<"href">>,Record#area.href},
      {<<"hreflang">>,Record#area.hreflang},
      {<<"media">>,Record#area.media},
      {<<"rel">>,Record#area.rel},
      {<<"shape">>, case Record#area.shape of "rect" -> "rect"; "circle" -> "circle"; "poly" -> "poly"; "default" -> "default"; _ -> [] end},
      {<<"target">>,Record#area.target},
      {<<"type">>,Record#area.type} | Record#area.data_fields
    ],
    wf_tags:emit_tag(<<"area">>, List).