Mercurial > urweb
comparison lib/ur/basis.urs @ 717:e28637743279
URLs
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 09 Apr 2009 16:36:50 -0400 |
parents | 0f42461273cf |
children | f152f215a02c |
comparison
equal
deleted
inserted
replaced
716:a6941960f459 | 717:e28637743279 |
---|---|
484 val ol : bodyTag [] | 484 val ol : bodyTag [] |
485 val ul : bodyTag [] | 485 val ul : bodyTag [] |
486 | 486 |
487 val hr : bodyTag [] | 487 val hr : bodyTag [] |
488 | 488 |
489 val a : bodyTag [Link = transaction page, Onclick = transaction unit] | 489 type url |
490 val bless : string -> url | |
491 val a : bodyTag [Link = transaction page, Href = url, Onclick = transaction unit] | |
492 | |
493 val img : bodyTag [Src = url] | |
490 | 494 |
491 val form : ctx ::: {Unit} -> bind ::: {Type} | 495 val form : ctx ::: {Unit} -> bind ::: {Type} |
492 -> [[Body] ~ ctx] => | 496 -> [[Body] ~ ctx] => |
493 xml form [] bind | 497 xml form [] bind |
494 -> xml ([Body] ++ ctx) [] [] | 498 -> xml ([Body] ++ ctx) [] [] |