Line # | Revision | Author | |
---|---|---|---|
1 | 3 | ahitrov@rambler.ru | package Contenido::MVC::DispatchType; |
2 | |||
3 | use strict; | ||
4 | |||
5 | sub new { | ||
6 | my $proto = shift; | ||
7 | my $class = ref($proto) || $proto; | ||
8 | my $self = {}; | ||
9 | return bless $self, $class; | ||
10 | } | ||
11 | |||
12 | sub match { | ||
13 | return undef; | ||
14 | } | ||
15 | |||
16 | sub register { | ||
17 | return undef; | ||
18 | } | ||
19 | |||
20 | sub after_register { | ||
21 | return undef; | ||
22 | } | ||
23 | |||
24 | 1; |