diff options
Diffstat (limited to 'lib/ur/basis.urs')
| -rw-r--r-- | lib/ur/basis.urs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index cabac068..ece4bfef 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -797,6 +797,12 @@ val submit : ctx ::: {Unit} -> use ::: {Type} -> tag ([Value = string, Action = $use -> transaction page] ++ boxAttrs) ([Form] ++ ctx) ([Form] ++ ctx) use [] +val image : ctx ::: {Unit} -> use ::: {Type} + -> [[Form] ~ ctx] => + unit + -> tag ([Src = url, Width = int, Height = int, Alt = string, Action = $use -> transaction page] ++ boxAttrs) + ([Form] ++ ctx) ([Form] ++ ctx) use [] + val label : bodyTag ([For = string, Accesskey = string] ++ tableAttrs) |