Mercurial > pub > Impl
comparison Lib/IMPL/Test/Unit.pm @ 97:964587c5183c
Added SecureCall to Web QueryHandlers stack
many bug fixes to Security and Web Application modules
| author | wizard |
|---|---|
| date | Tue, 04 May 2010 04:04:37 +0400 |
| parents | 74bae30eb25e |
| children | f8de52d3c112 |
comparison
equal
deleted
inserted
replaced
| 96:4c55aed00ff2 | 97:964587c5183c |
|---|---|
| 37 } | 37 } |
| 38 | 38 |
| 39 sub Cleanup { | 39 sub Cleanup { |
| 40 my ($this,$session) = @_; | 40 my ($this,$session) = @_; |
| 41 | 41 |
| 42 $session->{$_} = $this->$_() foreach map $_->DataList, $this->get_meta('IMPL::Test::Unit::SharedData'); | 42 $session->{$_} = $this->$_() foreach map $_->DataList, $this->get_meta('IMPL::Test::Unit::SharedData',undef,1); |
| 43 | 43 |
| 44 1; | 44 1; |
| 45 } | 45 } |
| 46 | 46 |
| 47 sub StartUnit { | 47 sub StartUnit { |
| 51 } | 51 } |
| 52 | 52 |
| 53 sub InitTest { | 53 sub InitTest { |
| 54 my ($this,$session) = @_; | 54 my ($this,$session) = @_; |
| 55 | 55 |
| 56 $this->$_($session->{$_}) foreach map $_->DataList, $this->get_meta('IMPL::Test::Unit::SharedData'); | 56 $this->$_($session->{$_}) foreach map $_->DataList, $this->get_meta('IMPL::Test::Unit::SharedData',undef,1); |
| 57 } | 57 } |
| 58 | 58 |
| 59 sub FinishUnit { | 59 sub FinishUnit { |
| 60 my ($class,$session) = @_; | 60 my ($class,$session) = @_; |
| 61 | 61 |
