comparison Lib/IMPL/ORM/Schema/ValueType.pm @ 38:d660fb38b7cc

small fixes ORM shema to SQL schema transformation
author Sergey
date Mon, 23 Nov 2009 17:57:07 +0300
parents
children 009aa9ca2e48
comparison
equal deleted inserted replaced
37:c2e7f7c96bcd 38:d660fb38b7cc
1 package IMPL::ORM::Schema::ValueType;
2 use strict;
3 use warnings;
4
5 use base qw(IMPL::DOM::Node);
6 use IMPL::Class::Property;
7 use IMPL::DOM::Property qw(_dom);
8
9 BEGIN {
10 public _dom property name => prop_all;
11 public _dom property mapper => prop_all;
12 }
13
14 our %CTOR = (
15 'IMPL::DOM::Node' => sub {
16 my %args = @_;
17 $args{nodeName} = 'ValueType';
18 %args;
19 }
20 );
21
22 1;