Mercurial > pub > Impl
comparison _test/Test/Class/Template.pm @ 271:56364d0c4b4f
+IMPL::SQL::Schema::MySQL: added basic support for MySQL
author | cin |
---|---|
date | Mon, 28 Jan 2013 02:43:14 +0400 |
parents | 4d0e1962161c |
children | 4ddb27ff4a0b |
comparison
equal
deleted
inserted
replaced
270:3f59fd828d5f | 271:56364d0c4b4f |
---|---|
27 public property name => prop_all; | 27 public property name => prop_all; |
28 } | 28 } |
29 }; | 29 }; |
30 | 30 |
31 test IsDerivedFromTemplate => sub { | 31 test IsDerivedFromTemplate => sub { |
32 failed "My::Collection should be a subclass of IMPL::Class:Template" unless is('My::Collection','IMPL::Class::Template'); | 32 failed "My::Collection should be a subclass of IMPL::Class:Template" unless isclass('My::Collection','IMPL::Class::Template'); |
33 }; | 33 }; |
34 | 34 |
35 test Specialize => sub { | 35 test Specialize => sub { |
36 my $colList = spec My::Collection('IMPL::Object::List'); | 36 my $colList = spec My::Collection('IMPL::Object::List'); |
37 my $colObj = spec My::Collection('IMPL::Object'); | 37 my $colObj = spec My::Collection('IMPL::Object'); |