diff Lib/IMPL/DOM/Schema/InflateFactory.pm @ 248:814d755e5d12

Minor fixes
author sergey
date Tue, 06 Nov 2012 00:58:15 +0400
parents 4d0e1962161c
children
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Schema/InflateFactory.pm	Wed Oct 31 04:18:35 2012 +0400
+++ b/Lib/IMPL/DOM/Schema/InflateFactory.pm	Tue Nov 06 00:58:15 2012 +0400
@@ -5,7 +5,7 @@
 require IMPL::Object::Factory;
 
 sub new {
-    my ($self,$value) = @_;
+    my ($self,$value,$schema) = @_;
     
     if ($value =~ /^(\w+(?:::\w+)*)(?:\.(\w+))?$/) {
         return IMPL::Object::Factory->new($1,undef,$2);