Commit 15848d15 authored by Steffen Michels's avatar Steffen Michels

use synonym type TUIId also for TUI definitions not only for updates

git-svn-id: https://svn.cs.ru.nl/repos/iTask-system/trunk@1113 63da3aa8-80fd-4f01-9db8-e6ea747a3da2
parent 19da10d4
......@@ -17,15 +17,15 @@ instance == TUIDef
:: TUIId :== String
:: TUIUpdate
= TUIAdd TUIId TUIDef // Add the additional component *after* the component with indicated id
| TUIAddTo TUIId TUIDef // Add the additional component as a child of the component with indicated id
| TUIRemove TUIId // Remove the component with indicated id
| TUIReplace TUIId TUIDef // Replace a component
| TUISetValue TUIId String // Call setValue on the component with indicated id
| TUISetEnabled TUIId Bool // Enable/disable form elements
| TUISetError TUIId String // Set the error messages on a component
| TUISetHint TUIId String // Set the hint messages on a component
| TUIReplaceMenu [TUIDef]
= TUIAdd TUIId TUIDef // Add the additional component *after* the component with indicated id
| TUIAddTo TUIId TUIDef // Add the additional component as a child of the component with indicated id
| TUIRemove TUIId // Remove the component with indicated id
| TUIReplace TUIId TUIDef // Replace a component
| TUISetValue TUIId String // Call setValue on the component with indicated id
| TUISetEnabled TUIId Bool // Enable/disable form elements
| TUISetError TUIId String // Set the error messages on a component
| TUISetHint TUIId String // Set the hint messages on a component
| TUIReplaceMenu [TUIDef]
:: TUIDef
= TUILabel
......@@ -60,7 +60,7 @@ instance == TUIDef
:: TUIBasicControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, value :: !String
, fieldLabel :: !Maybe String
, staticDisplay :: !Bool
......@@ -70,7 +70,7 @@ instance == TUIDef
}
:: TUIChoiceControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, fieldLabel :: !Maybe String
, allowMultiple :: !Bool
, optional :: !Bool
......@@ -79,7 +79,7 @@ instance == TUIDef
}
:: TUICurrencyControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, value :: !String
, fieldLabel :: !Maybe String
, currencyLabel :: !String
......@@ -89,7 +89,7 @@ instance == TUIDef
, hintMsg :: !String
}
:: TUIDocumentControl =
{ id :: !String
{ id :: !TUIId
, name :: !String
, document :: !Document
, fieldLabel :: !Maybe String
......@@ -100,7 +100,7 @@ instance == TUIDef
}
:: TUIButtonControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, value :: !String
, label :: !String
, iconCls :: !String
......@@ -111,7 +111,7 @@ instance == TUIDef
, hintMsg :: !String
}
:: TUIConstructorControl =
{ id :: !String
{ id :: !TUIId
, name :: !String
, fieldLabel :: !Maybe String
, consSelIdx :: !Int
......@@ -123,7 +123,7 @@ instance == TUIDef
}
:: TUIFormattedTextControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, value :: !String
, fieldLabel :: !Maybe String
, optional :: !Bool
......@@ -140,18 +140,18 @@ instance == TUIDef
}
:: TUIListItemControl =
{ name :: !String
, id :: !String
, id :: !TUIId
, items :: ![TUIDef]
, index :: !Int
}
:: TUITupleContainer =
{ id :: !String
{ id :: !TUIId
, items :: ![[TUIDef]]
, fieldLabel :: !Maybe String
}
:: TUIRecordContainer =
{ id :: !String
{ id :: !TUIId
, name :: !String
, title :: !Maybe String
, items :: ![TUIDef]
......@@ -163,7 +163,7 @@ instance == TUIDef
:: TUIListContainer =
{ items :: ![TUIDef]
, name :: !String
, id :: !String
, id :: !TUIId
, fieldLabel :: !Maybe String
, hideLabel :: !Bool
, staticDisplay :: !Bool
......@@ -175,7 +175,7 @@ instance == TUIDef
{ html :: !String
, border :: !Bool
, bodyCssClass :: !String
, id :: !String
, id :: !TUIId
, fieldLabel :: !Maybe String
, hideLabel :: !Bool
, unstyled :: !Bool
......@@ -183,7 +183,7 @@ instance == TUIDef
:: TUIButton =
{ name :: !String
, id :: !String
, id :: !TUIId
, text :: !String
, value :: !String
, disabled :: !Bool
......@@ -198,7 +198,7 @@ instance == TUIDef
, disabled :: !Bool
}
:: TUIMenuItem =
{ id :: !Maybe String
{ id :: !Maybe TUIId
, text :: !String
, name :: !Maybe String
, value :: !Maybe String
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment