*** empty log message ***

libraries/htmlGEC/Examples/Simple Workflows/workflowExamples.icl

@@ -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

libraries/htmlGEC/htmlHandler.dcl

@@ -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
 

libraries/htmlGEC/htmlHandler.icl

@@ -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 	

libraries/htmlGEC/htmlSettings.dcl

@@ -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