diff Lib/IMPL/Web/TT/Form.pm @ 158:a9f4ba4783eb

Minor changes
author wizard
date Tue, 02 Nov 2010 20:17:22 +0300
parents e6447ad85cb4
children 4267a2ac3d46
line wrap: on
line diff
--- a/Lib/IMPL/Web/TT/Form.pm	Wed Oct 20 18:02:47 2010 +0400
+++ b/Lib/IMPL/Web/TT/Form.pm	Tue Nov 02 20:17:22 2010 +0300
@@ -99,6 +99,7 @@
 			sourceSchema => $schemaSource,
 			errors => \@errors,
 			data => $node,
+			inputType => $schemaSource->nodeProperty('inputType') || $schema->nodeProperty('inputType'),
 			nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through
 			queryParameter => $this->makeParameterName([@$path,{ node => $node, schemaSource => $schemaSource}])
 		}
@@ -164,7 +165,8 @@
 		errors => \@errors,
 		data => $node,
 		nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through
-		queryParameter => $queryParameter
+		queryParameter => $queryParameter,
+		inputType => $sourceSchema->nodeProperty('inputType') || $schema->nodeProperty('inputType')
 	};
 }