# HG changeset patch
# User cin
# Date 1362093330 -14400
# Node ID 9b25e1f50144bc46fcb1cd9fc1a3e44f725ec335
# Parent  8088779e539d1b48c5799c230fc4acbb80649428
sync

diff -r 8088779e539d -r 9b25e1f50144 Lib/IMPL/Web/Application/CustomResource.pm
--- a/Lib/IMPL/Web/Application/CustomResource.pm	Thu Feb 28 02:19:38 2013 +0400
+++ b/Lib/IMPL/Web/Application/CustomResource.pm	Fri Mar 01 03:15:30 2013 +0400
@@ -45,6 +45,12 @@
     )
 }
 
+sub CreateResource {
+    my ($self,%args) = @_;
+    
+    $self->CreateContract()->CreateResource(%args);
+}
+
 sub GetChildResources {
     
 }
@@ -111,6 +117,10 @@
 конструкторе будет передан список из ключей и значений хеша C<%args>, а затем
 остальные аргументы.
 
+=head2 C<[static]CreateResource(%args)>
+
+Создает контракт по-умолчанию и вызывает у него метод C<CreateResource(%args)>.
+
 =head2 C<[static]GetChildResources()>
 
 Статический метод, который должны переопределять новые классы ресурсов, у