package Ġorg . kw icket . kotlin x . html Ċ Ċ import Ġkotlinx . html . A Ċ import Ġkotlinx . html . BUTTON Ċ import Ġkotlinx . html . DIV Ċ import Ġkotlinx . html . FORM Ċ import Ġkotlinx . html . Flow Content Ċ import Ġkotlinx . html . Flow Or Heading Content Ċ import Ġkotlinx . html . Flow Or Interactive Or Ph r asing Content Ċ import Ġkotlinx . html . Flow Or Ph r asing Content Ċ import Ġkotlinx . html . H 1 Ċ import Ġkotlinx . html . H 2 Ċ import Ġkotlinx . html . H 3 Ċ import Ġkotlinx . html . H 4 Ċ import Ġkotlinx . html . H 5 Ċ import Ġkotlinx . html . H 6 Ċ import Ġkotlinx . html . IMG Ċ import Ġkotlinx . html . INPUT Ċ import Ġkotlinx . html . InputType Ċ import Ġkotlinx . html . LABEL Ċ import Ġkotlinx . html . LEG END Ċ import Ġkotlinx . html . LI Ċ import Ġkotlinx . html . OL Ċ import Ġkotlinx . html . P Ċ import Ġkotlinx . html . SELECT Ċ import Ġkotlinx . html . SPAN Ċ import Ġkotlinx . html . TABLE Ċ import Ġkotlinx . html . TD Ċ import Ġkotlinx . html . TEXT AREA Ċ import Ġkotlinx . html . TH Ċ import Ġkotlinx . html . TR Ċ import Ġkotlinx . html . Tag Consumer Ċ import Ġkotlinx . html . TextArea Wrap Ċ import Ġkotlinx . html . Th Scope Ċ import Ġkotlinx . html . UL Ċ import Ġkotlinx . html . attributes . enum Encode Ċ import Ġkotlinx . html . attributes Map Of Ċ import Ġkotlinx . html . stream . append HTML Ċ import Ġkotlinx . html . visit Ċ import Ġorg . apache . wicket . Component Ċ import Ġorg . apache . wicket . Page Ċ import Ġorg . apache . wicket . behavior . Attribute Appender Ċ import Ġorg . apache . wicket . model . I Model Ċ import Ġorg . apache . wicket . request . mapper . parameter . Page Parameters Ċ import Ġorg . apache . wicket . util . resource . I Resource Stream Ċ import Ġorg . kw icket . behavior . Visible When Ċ import Ġorg . kw icket . component . init Ċ import Ġorg . kw icket . to Resource Stream Ċ import Ġorg . kw icket . wicket . core . markup . html . K Web Markup Container Ċ import Ġorg . kw icket . wicket . core . markup . html . basic . K Label Ċ import Ġorg . kw icket . wicket . core . markup . html . form . K Form Ċ import Ġorg . kw icket . wicket . core . markup . html . link . K Bookmark able Page Link Ċ import Ġorg . kw icket . wicket Id Attr Ċ import Ġkotlin . reflect . K Class Ċ Ċ fun ĠFlow Or Ph r asing Content . span ( ĊĠĠĠ Ġid : ĠString , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠSP AN . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠSP AN ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . span ( ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ SPAN . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ SPAN ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel ) Ġ}, ĊĠĠĠĠĠĠĠ Ġinitial Attributes Ġ= Ġattributes Map Of (" class ", Ġclasses ), ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ // ĠFIXME : Ġmake Ġthe Ġbuilder Ġthe Ġfirst Ġparameter Ċ fun ĠFlow Or Ph r asing Content . span ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġbuilder : Ġ(( String ) Ġ-> ĠComponent ), ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ SPAN . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ SPAN ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġbuilder , ĊĠĠĠĠĠĠĠ Ġattributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . span ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġblock : ĠW ICK ET _ SPAN . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ SPAN ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġattributes Map Of ( wicket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ // ĠFIXME : Ġadd Ġa Ġfunction Ġto Ġgenerate Ġa ĠCSS Ġclass Ġbehavior Ġ-- Ġ" row ". to Css Class () Ġ= ĠBehavior ; Ġ" row ". css () Ġ= ĠBehavior Ċ Ċ fun ĠFlow Content . div ( ĊĠĠĠ Ġbuilder : Ġ(( String ) Ġ-> ĠComponent ) Ġ= Ġ{ ĠK Web Markup Container ( id Ġ= Ġit ) Ġ}, ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ DIV . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ DIV ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġbuilder , ĊĠĠĠĠĠĠĠ Ġattributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Content . div ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ DIV . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ DIV ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Web Markup Container ( id Ġ= Ġit , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġattributes Map Of ( wicket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Content . p ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠP . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠP ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . p ( ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ P . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ P ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel ). init ( be haviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ})) Ġ}, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . a ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠA . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠA ( attributes Map Of ( wicket Id Attr , Ġid , Ġ" class ", Ġclasses ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Content . ul ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠU L . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠU L ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . a ( ĊĠĠĠ Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ A . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ A ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ Ġbuilder ( it ). init ( be haviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠ Ġ)) }, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun Ġ< P : ĠPage > ĠFlow Or Ph r asing Content . a ( ĊĠĠĠ Ġpage : ĠK Class < P >, ĊĠĠĠ Ġparams : ĠPage Parameters ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ A . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ A ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Bookmark able Page Link ( id Ġ= Ġit , Ġpage Ġ= Ġpage , Ġparams Ġ= Ġparams , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . ul ( ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ UL . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ UL ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĠK Web Markup Container ( id Ġ= Ġit , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠ Ġ)) }, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . ul ( ĊĠĠĠ Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġblock : ĠW ICK ET _ UL . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ UL ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġbuilder , ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . li ( ĊĠĠĠ Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġblock : ĠW ICK ET _ LI . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ LI ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġbuilder , ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . li ( ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġblock : ĠW ICK ET _ LI . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ LI ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠ Ġ)) }, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . form ( ĊĠĠĠ Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġblock : ĠW ICK ET _ FORM . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ FORM ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġbuilder , ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . form ( ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġblock : ĠW ICK ET _ FORM . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ FORM ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġ{ ĠK Form ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠ Ġ)) }, ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . button ( ĊĠĠĠ Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġblock : ĠW ICK ET _ BUTTON . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ BUTTON ( ĊĠĠĠĠĠĠĠ Ġid Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġbuilder Ġ= Ġbuilder , ĊĠĠĠĠĠĠĠ Ġconsumer Ġ= Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Content . ol ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠO L . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠO L ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠU L . li ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠLI . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠLI ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Content . table ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠTABLE . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠTABLE ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 1 ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠH 1 . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠH 1 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 2 ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠH 2 . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠH 2 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 3 ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠH 3 . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠH 3 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 4 ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠH 4 . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠH 4 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 4 ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġblock : ĠW ICK ET _ H 4 . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ H 4 ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġattributes Map Of ( wicket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 5 ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠH 5 . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠH 5 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Heading Content . h 6 ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠH 6 . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠH 6 ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . button ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠBUTTON . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠBUTTON ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . input ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġtype : ĠInput Type ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠINPUT . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠINPUT ( attributes Map Of (" type ", Ġtype ?. enum Encode (), Ġ" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . img ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠI MG . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠI MG ( ĊĠĠĠ Ġattributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), ĊĠĠĠ Ġconsumer Ċ ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . textArea ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġrows : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġcols : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġwrap : ĠText Area Wrap ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠTEXT AREA . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠTEXT AREA ( ĊĠĠĠ Ġattributes Map Of ( ĊĠĠĠĠĠĠĠ Ġ" rows ", Ġrows , Ġ" cols ", Ġcols , Ġ" wrap ", Ġwrap ?. enum Encode (), Ġ" class ", Ġclasses , ĊĠĠĠĠĠĠĠ Ġw icket Id Attr , Ġid ĊĠĠĠ Ġ), ĊĠĠĠ Ġconsumer Ċ ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . label ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠLABEL . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠLABEL ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . label ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġbuilder : Ġ(( String ) Ġ-> ĠComponent ), ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ LABEL . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ LABEL ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġbuilder , ĊĠĠĠĠĠĠĠ Ġattributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . label ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġblock : ĠW ICK ET _ LABEL . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ LABEL ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġattributes Map Of ( wicket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ // ĠFIXME : Ġmove Ġthe Ġmodel Ġto Ġbe Ġthe Ġfirst Ġarg Ċ fun ĠFlow Or Ph r asing Content . legend ( ĊĠĠĠ Ġmodel : ĠI Model <* >, ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠList < String >? Ġ= Ġnull , ĊĠĠĠ Ġvisible : Ġ(() Ġ-> ĠBoolean )? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ LEG END . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ LEG END ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠK Label ( id Ġ= Ġit , Ġmodel Ġ= Ġmodel , Ġbehaviors Ġ= ĠlistOf NotNull ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvisible ?. let Ġ{ ĠVis ible When Ġ{ Ġvisible () Ġ} Ġ}, ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġclasses ?. let Ġ{ ĠAttribute Appender (" class ", Ġclasses . join ToString (" Ġ"), Ġ" Ġ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ}, ĊĠĠĠĠĠĠĠ Ġattributes Map Of ( wicket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠFlow Or Interactive Or Ph r asing Content . select ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠSELECT . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĠSELECT ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠFlow Or Ph r asing Content . select ( ĊĠĠĠ Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġbuilder : Ġ(( String ) Ġ-> ĠComponent ), ĊĠĠĠ Ġclasses : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġblock : ĠW ICK ET _ SELECT . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠUnit Ġ= ĊĠĠĠ ĠW ICK ET _ SELECT ( ĊĠĠĠĠĠĠĠ Ġid , ĊĠĠĠĠĠĠĠ Ġbuilder , ĊĠĠĠĠĠĠĠ Ġattributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), ĊĠĠĠĠĠĠĠ Ġconsumer ĊĠĠĠ Ġ). visit ( block ) Ċ Ċ fun ĠTABLE . tr ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠTR . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠTR ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠTR . td ( id : ĠString ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠTD . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠTD ( attributes Map Of (" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun ĠTR . th ( id : ĠString ? Ġ= Ġnull , Ġscope : ĠTh Scope ? Ġ= Ġnull , Ġclasses : ĠString ? Ġ= Ġnull , Ġblock : ĠTH . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠUnit Ġ= ĊĠĠĠ ĠTH ( attributes Map Of (" scope ", Ġscope ?. enum Encode (), Ġ" class ", Ġclasses , Ġw icket Id Attr , Ġid ), Ġconsumer ). visit ( block ) Ċ Ċ fun Ġpanel ( block : ĠPAN EL . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠI Resource Stream Ġ= ĊĠĠĠ Ġbuild String Ġ{ ĊĠĠĠĠĠĠĠ Ġappend HTML (). panel ( block Ġ= Ġblock ) ĊĠĠĠ Ġ}. to Resource Stream () Ċ Ċ fun Ġborder ( block : ĠBORDER . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠI Resource Stream Ġ= ĊĠĠĠ Ġbuild String Ġ{ ĊĠĠĠĠĠĠĠ Ġappend HTML (). border ( block Ġ= Ġblock ) ĊĠĠĠ Ġ}. to Resource Stream () Ċ Ċ fun Ġextend ( block : ĠEXT END . () Ġ-> ĠUnit Ġ= Ġ{} ): ĠI Resource Stream Ġ= ĊĠĠĠ Ġbuild String Ġ{ ĊĠĠĠĠĠĠĠ Ġappend HTML (). extend ( block Ġ= Ġblock ) ĊĠĠĠ Ġ}. to Resource Stream () Ċ Ċ fun Ġattrs ( initial Attributes : ĠMap < String , ĠString >, Ġid : ĠString ?) Ġ= ĊĠĠĠ Ġif Ġ( id Ġ== Ġnull ) Ġinitial Attributes Ġelse Ġinitial Attributes Ġ+ Ġ( wicket Id Attr Ġto Ġid ) Ċ Ċ class ĠW ICK ET _ UL ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠU L ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ LI ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠLI ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ A ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠA ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ SPAN ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString >, ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠSP AN ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ P ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠP ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ LABEL ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString >, ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠLABEL ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ DIV ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString >, ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠDIV ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ FORM ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠFORM ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ BUTTON ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠBUTTON ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ H 4 ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠH 4 ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ SELECT ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠSELECT ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag Ċ Ċ class ĠW ICK ET _ LEG END ( ĊĠĠĠ Ġoverride Ġval Ġid : ĠString ? Ġ= Ġnull , ĊĠĠĠ Ġoverride Ġval Ġbuilder : Ġ( String ) Ġ-> ĠComponent , ĊĠĠĠ Ġinitial Attributes : ĠMap < String , ĠString > Ġ= Ġempty Map (), ĊĠĠĠ Ġconsumer : ĠTag Consumer < *> Ċ ) Ġ: ĠLE G END ( initial Attributes Ġ= Ġattrs ( initial Attributes , Ġid ), Ġconsumer Ġ= Ġconsumer ), ĊĠĠĠ ĠW icket Tag