diff --git a/calexium_lib/web/CXM_dojo.anubis b/calexium_lib/web/CXM_dojo.anubis
index ab18dac..66e686a 100644
--- a/calexium_lib/web/CXM_dojo.anubis
+++ b/calexium_lib/web/CXM_dojo.anubis
@@ -111,7 +111,7 @@ public define HTML_Off_Form
literal("")
]).
-define HTML_Row(HTML_Off_Form)
+define HTML_Off_Form
input_in_dialog
(
InputDial input_data
@@ -119,8 +119,8 @@ define HTML_Row(HTML_Off_Form)
if input_data is
{
input_dial(id, input, label) then
- row([], [cell([], sequence([
- literal(""),
+ sequence([
+ literal("
"),
literal("")
- ]))]),
+ " name=\""+id+"\" id=\""+id+"\" />
")
+ ]),
input_date(id, label) then
- row([], [cell([], sequence([
- literal(""),
- literal("
-
"
- )
- ]))]),
- input_combo(label, id, name, list_data) then
- row([], [cell([], sequence([
- dojo_combobox(name, id, label, list_data)]))])
+ sequence([
+ literal(""),
+ literal("
+
"
+ )
+ ]),
+ input_combo(label, the_id, name, list_data) then
+ sequence([
+ literal(""),
+ dojo_combobox(name, the_id, label, list_data),
+ literal("
")
+ ])
}
.
-define List(HTML_Row(HTML_Off_Form))
+define List(HTML_Off_Form)
inputs_in_dialog
(
List(InputDial) inputs_data
@@ -167,30 +170,25 @@ public define HTML_Off_Form
Maybe(String) do_cancel
)
=
- sequence[
+ sequence([
div([attr("dojoType", "dijit.Dialog"), id(dialog_id), title(name), attr("execute", execute)],
- table([],
- empty,
- append(
- inputs_in_dialog(inputs_data),
- [
- row([], [cell([columns(2), h_center],
- literal("" +
- if cancel is
- {
- failure then "",
- success(cancel_label) then ""
- }
- ))]),
- ]),
- empty)),
- literal("
"),
- ]
+ sequence([
+ sequence(inputs_in_dialog(inputs_data)),
+ literal("" +
+ if cancel is
+ {
+ failure then "",
+ success(cancel_label) then ""
+ }),
+ literal("
")
+ ])
+ )
+ ])
.
public define HTML_Off_Form
--
libgit2 0.21.4