Mercurial > pub > Impl
comparison Lib/IMPL/Web/QueryHandler.pm @ 194:4d0e1962161c
Replaced tabs with spaces
IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
author | cin |
---|---|
date | Tue, 10 Apr 2012 20:08:29 +0400 |
parents | d1676be8afcc |
children |
comparison
equal
deleted
inserted
replaced
193:8e8401c0aea4 | 194:4d0e1962161c |
---|---|
6 __PACKAGE__->PassThroughArgs; | 6 __PACKAGE__->PassThroughArgs; |
7 | 7 |
8 use IMPL::Exception; | 8 use IMPL::Exception; |
9 | 9 |
10 sub Invoke { | 10 sub Invoke { |
11 my ($self,$action,$nextHandler) = @_; | 11 my ($self,$action,$nextHandler) = @_; |
12 | 12 |
13 if (not ref $self) { | 13 if (not ref $self) { |
14 return $self->new( action => $action )->Invoke($action,$nextHandler); | 14 return $self->new( action => $action )->Invoke($action,$nextHandler); |
15 } else { | 15 } else { |
16 return $self->Process($action,$nextHandler); | 16 return $self->Process($action,$nextHandler); |
17 } | 17 } |
18 } | 18 } |
19 | 19 |
20 sub Process { | 20 sub Process { |
21 die new IMPL::NotImplementedException("The method isn't implemented", __PACKAGE__, 'Process'); | 21 die new IMPL::NotImplementedException("The method isn't implemented", __PACKAGE__, 'Process'); |
22 } | 22 } |
23 | 23 |
24 1; | 24 1; |
25 | 25 |
26 __END__ | 26 __END__ |
40 package MyHandler; | 40 package MyHandler; |
41 | 41 |
42 use parent 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 } |
48 | 48 |
49 sub Process { | 49 sub Process { |
50 my ($this,$action,$nextHandler) = @_; | 50 my ($this,$action,$nextHandler) = @_; |
51 | 51 |
52 } | 52 } |
53 | 53 |
54 =end code | 54 =end code |
55 | 55 |
56 =head1 MEMBERS | 56 =head1 MEMBERS |