Mercurial > pub > Impl
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);