diff Lib/IMPL/Web/View/Metadata/FormProvider.pm @ 364:82b6c967bcf1

sync, working on metadata
author cin
date Fri, 29 Nov 2013 16:33:07 +0400
parents
children 7c621bb95e53
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Lib/IMPL/Web/View/Metadata/FormProvider.pm	Fri Nov 29 16:33:07 2013 +0400
@@ -0,0 +1,27 @@
+package IMPL::Web::View::Metadata::FormProvider;
+use strict;
+
+use IMPL::declare {
+	base => [
+		'IMPL::Object' => undef
+	]
+};
+
+sub GetFormMetadata {
+	my ($this,$model, $form) = @_;
+}
+
+sub PopulateChildren {
+	my ($this,$meta) = @_;
+	
+	map {
+		$_->name,
+		$_
+	} $meta->schema->content->childNodes;
+}
+
+sub GetChild {
+	
+} 
+
+1;
\ No newline at end of file