comparison Lib/IMPL/Web/QueryHandler.pm @ 166:4267a2ac3d46

Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents 9d24db321029
children d1676be8afcc
comparison
equal deleted inserted replaced
165:76515373dac0 166:4267a2ac3d46
1 package IMPL::Web::QueryHandler; 1 package IMPL::Web::QueryHandler;
2 2
3 use base qw(IMPL::Object IMPL::Object::Autofill IMPL::Object::Serializable); 3 use parent qw(IMPL::Object IMPL::Object::Autofill IMPL::Object::Serializable);
4 use IMPL::Class::Property; 4 use IMPL::Class::Property;
5 5
6 __PACKAGE__->PassThroughArgs; 6 __PACKAGE__->PassThroughArgs;
7 7
8 use IMPL::Exception; 8 use IMPL::Exception;
37 37
38 =begin code 38 =begin code
39 39
40 package MyHandler; 40 package MyHandler;
41 41
42 use base qw(IMPL::Web::QueryHandler); 42 use parent qw(IMPL::Web::QueryHandler);
43 43
44 sub CTOR { 44 sub CTOR {
45 my ($this,%args) = @_; 45 my ($this,%args) = @_;
46 46
47 } 47 }