Mercurial > pub > Impl

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor changes
author wizard
date Tue, 02 Nov 2010 20:17:22 +0300
parents e6447ad85cb4
children 4267a2ac3d46
comparison
equal deleted inserted replaced
157:c7652cf29a80 158:a9f4ba4783eb
97 { 97 {
98 schema => $schema, 98 schema => $schema,
99 sourceSchema => $schemaSource, 99 sourceSchema => $schemaSource,
100 errors => \@errors, 100 errors => \@errors,
101 data => $node, 101 data => $node,
102 inputType => $schemaSource->nodeProperty('inputType') || $schema->nodeProperty('inputType'),
102 nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through 103 nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through
103 queryParameter => $this->makeParameterName([@$path,{ node => $node, schemaSource => $schemaSource}]) 104 queryParameter => $this->makeParameterName([@$path,{ node => $node, schemaSource => $schemaSource}])
104 } 105 }
105 ); 106 );
106 } 107 }
162 schema => $schema, 163 schema => $schema,
163 sourceSchema => $sourceSchema, 164 sourceSchema => $sourceSchema,
164 errors => \@errors, 165 errors => \@errors,
165 data => $node, 166 data => $node,
166 nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through 167 nodeValue => $node && $node->nodeValue, # small hack set a non dom class property through
167 queryParameter => $queryParameter 168 queryParameter => $queryParameter,
169 inputType => $sourceSchema->nodeProperty('inputType') || $schema->nodeProperty('inputType')
168 }; 170 };
169 } 171 }
170 172
171 sub makeContent { 173 sub makeContent {
172 my ($this,$mappings) = @_; 174 my ($this,$mappings) = @_;