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 |