[usrcls-new strick**20120326093537 Ignore-this: 69bba3231dc85b8d65af86e4c4376e0c ] hunk ./terse-a1/res/raw/prelude.txt 120 - '|link|/HelloWeb|[HelloWeb]|'; + '|link|/DemoHt|[DemoHt]|'; hunk ./terse-a1/res/raw/prelude.txt 138 - '|link|/HelloWeb|[HelloWeb]|', 'HelloWeb '; + '|link|/DemoHt|[DemoHt]|', 'DemoHt '; hunk ./terse-a1/res/raw/prelude.txt 394 -class HelloWeb App -meth HelloWeb handle:query: +class DemoHt App +meth DemoHt handle:query: + + guts = Ht( + Tag('li', 'Test.'), + Tag('li', TAG('span'; 'style', 'color:yellow'; 'Hello')), + Tag('li', TAG('span'; 'style', 'background-color:brown'; 'World!')), + Tag('li', '[', TAG('a'; 'href', '/Home'; 'GO HOME'), ']'), + ). + guts append: Ht( + FOR(i:100)MAP( + Tag('li', i))). + page = TAG('html', + TAG('body'; + 'bgcolor', '#222222'; + 'text', '#DDDDDD'; + TAG('big', + TAG('big', + TAG('ul', guts))))). hunk ./terse-a1/res/raw/prelude.txt 415 - 'title', 'HelloWeb Title'; - 'value', ' -