Mercurial > pub > Impl
view Lib/IMPL/ORM/Schema/ValueType.pm @ 289:85572f512abc
*TTView refactoring
author | cin |
---|---|
date | Wed, 20 Feb 2013 02:25:30 +0400 |
parents | 4267a2ac3d46 |
children |
line wrap: on
line source
package IMPL::ORM::Schema::ValueType; use strict; use parent qw(IMPL::DOM::Node); our %CTOR = ( 'IMPL::DOM::Node' => sub { nodeName => 'ValueType' } ); use IMPL::Class::Property; BEGIN { public property typeName => prop_all; public property typeReflected => prop_all; } sub CTOR { my ($this,$typeName,$typeReflected) = @_; $this->typeName($typeName); $this->typeReflected($typeReflected); } 1; __END__ =pod =cut