-module (index).
-compile(export_all).
-include_lib("nitrogen/include/wf.hrl").

main() -> #template { file="./site/templates/bare.html" }.

title() -> "Welcome to Nitrogen".

body() ->
        Data = [{"apple"},{"orange"},{"banana"},{"pear"}],
        Map = {fruit@value},
        [
                #bind{
                        data=Data,
                        map=Map,
                        transform=fun({Fruitname},Acc) ->
                                {{Fruitname},Acc,{fruitname@text,Fruitname}}
                        end,
                        body=[
                                #checkbox{id=fruit},
                                #label{id=fruitname},
                                #br{}
                        ]
                },
                #button{text="Submit",postback=checks}
        ].


event(checks) ->
        Selected = wf:qs(fruit),
        wf:wire(#alert{text=lists:concat(Selected)}).