Commit 27b466f4 authored by Rinus Plasmeijer's avatar Rinus Plasmeijer
Browse files

*** empty log message ***

parent c172757d
......@@ -7,10 +7,6 @@ import htmlTask, htmlHandler
derive gForm []
derive gUpd []
testCode tst = STask "OK" (showHtml [Txt "Vul de waarde in: ",Br, Hr [], B [] "test", Br ], 0) tst
//Start world = doHtmlServer (multiUser (Quotation myQuotation)) world
//Start world = doHtmlServer (multiUser twotasks3) world
Start world = doHtmlServer (multiUser agenda2) world
......
......@@ -47,6 +47,7 @@ derive gForm Inline
derive gUpd Inline
derive gParse Inline
derive gPrint Inline
derive gerda Inline
showHtml :: [BodyTag] -> Inline // enabling to show Html code in Clean data
......
......@@ -490,6 +490,7 @@ toBody form = BodyTag form.form
derive gUpd Inline
derive gParse Inline
derive gPrint Inline
derive gerda Inline
gForm{|Inline|} (init,formid) hst
# (Inline string) = formid.ival
......
......@@ -10,10 +10,10 @@ class iData a // The collection of generic functions needed to make iData:
, iDataSerAndDeSerialize a
class iDataSerialize a
| gPrint{|*|} // To serialize a value to a String
// , gerda {|*|} // OPTION: To store and retrieve a value in a database
, TC a // To be able to store values in a dynamic
// TC is a special class cannot be included here
| gPrint{|*|} // To serialize a value to a String
, gerda {|*|} // OPTION: To store and retrieve a value in a database
, TC a // To be able to store values in a dynamic
// TC is a special class cannot be included here
class iDataSerAndDeSerialize a
| gParse{|*|} // To de-serialize a string back to a value
, iDataSerialize a
......
Supports Markdown
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