diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis index 3df0cd8..b45da72 100644 --- a/calexium_lib/web/CXM_making_a_web_site.anubis +++ b/calexium_lib/web/CXM_making_a_web_site.anubis @@ -3522,24 +3522,8 @@ define String } + format(t) }. - - - Normalizing a list of cell options (horizontal position must be specified; the default - is 'left'). - -define List(Cell_Option) - normalize - ( - List(Cell_Option) l - ) = - if member(l,left) then l else - if member(l,h_center) then l else - if member(l,right) then l else - //[left . l]. CR: why ? there is no default because we can use CSS - l. - - - Formating cells in a row. + + Formating cells in a row. define Printable_tree format @@ -3551,7 +3535,7 @@ define Printable_tree { [ ] then [ ], [h . t] then if h is cell(options,element) then - ["", + ["", format_element(element), "" . format(t,format_element)] @@ -3567,7 +3551,7 @@ define Printable_tree { [ ] then [ ], [h . t] then if h is header_cell(options,element) then - ["", + ["", format_element(element), "" . format(t,format_element)] -- libgit2 0.21.4