Packages
form
4.10.3
11.4.15
11.4.14
8.3.0
8.0.0
7.10.0
7.8.0
7.7.0
7.6.2
7.6.1
7.6.0
7.4.2
7.4.1
7.4.0
7.1.0
6.11.1
6.10.7
6.10.6
6.10.5
6.10.4
6.10.2
6.10.1
6.4.0
5.12.1
5.12.0
5.8.7
5.8.6
5.8.5
5.8.4
5.8.3
5.8.2
5.8.1
5.8.0
5.7.0
5.5.0
5.3.4
5.3.3
5.3.2
5.3.1
5.3.0
5.1.10
5.1.9
5.1.8
5.1.7
5.1.6
5.1.5
5.1.4
5.1.3
5.1.2
5.1.1
4.12.3
4.12.2
4.12.1
4.12.0
4.11.15
4.11.14
4.11.13
4.11.12
4.11.11
4.11.10
4.11.9
4.11.8
4.11.7
4.11.6
4.11.5
4.11.4
4.11.3
4.11.2
4.11.1
4.11.0
4.10.5
4.10.4
4.10.3
4.10.2
4.10.1
4.10.0
4.7.0
4.6.0
ERP/1 X-FORM Business Cartulary
Current section
Files
Jump to
Current section
Files
src/forms_index.erl
-module(forms_index).
-copyright('Maxim Sokhatsky').
-compile(export_all).
-include_lib("nitro/include/nitro.hrl").
main() -> [].
body() -> [].
event({client,{form,F}}) ->
Module = nitro:to_atom(filename:basename(F,".erl")),
FORM = Module:new(Module,Module:id()),
nitro:insert_bottom(stand, #h3{body=nitro:to_binary(Module)}),
nitro:insert_bottom(stand, forms:new(FORM, [])),
nitro:insert_bottom(stand, nitro:jse(nitro:f("<figure><code>~n ~s~n~n</code></figure>",[forms:translate(FORM)]))),
nitro:insert_bottom(stand, #p{body = [nitro:f("Size: ~p/BERT",[size(term_to_binary(FORM,[compressed]))]), "<br>",
nitro:f("Type: ~p", [element(1,FORM)])]}), ok;
event(init) ->
nitro:clear(stand),
[ self() ! {client,{form,F}} || F <- lists:sort(mad_repl:wildcards(["src/forms/**/*.erl"])) ],
io:format("HELO.~n",[]);
event({Event,Name}) ->
nitro:wire(lists:concat(["console.log(\"",io_lib:format("~p",[{Event,Name}]),"\");"])),
io:format("Event:~p.~n", [{Event,nitro:q(nitro:to_atom(Name))}]);
event(Event) ->
io:format("Unknown:~p.~n", [Event]).