Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Schema/InflateFactory.pm @ 194:4d0e1962161c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replaced tabs with spaces IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
author cin
date Tue, 10 Apr 2012 20:08:29 +0400
parents d1676be8afcc
children 814d755e5d12
comparison
equal deleted inserted replaced
193:8e8401c0aea4 194:4d0e1962161c
3 3
4 require IMPL::Exception; 4 require IMPL::Exception;
5 require IMPL::Object::Factory; 5 require IMPL::Object::Factory;
6 6
7 sub new { 7 sub new {
8 my ($self,$value) = @_; 8 my ($self,$value) = @_;
9 9
10 if ($value =~ /^(\w+(?:::\w+)*)(?:\.(\w+))?$/) { 10 if ($value =~ /^(\w+(?:::\w+)*)(?:\.(\w+))?$/) {
11 return IMPL::Object::Factory->new($1,undef,$2); 11 return IMPL::Object::Factory->new($1,undef,$2);
12 } else { 12 } else {
13 die new IMPL::InvalidArgumentException("Expected value in the format PACKAGE::NAME.method_name",$value); 13 die new IMPL::InvalidArgumentException("Expected value in the format PACKAGE::NAME.method_name",$value);
14 } 14 }
15 } 15 }
16 16
17 1; 17 1;