[svn:p5ee] r6824 - p5ee/trunk/App-Context/t [email protected] Tue, 22 Aug 2006 14:54:18 -0700 (PDT) Newsgroups perl.cvs.p5ee Message-ID <[email protected]> Author: spadkins Date: Tue Aug 22 14:54:16 2006 New Revision: 6824 Added: p5ee/trunk/App-Context/t/AppSessionObjectTest.pm Log: new Added: p5ee/trunk/App-Context/t/AppSessionObjectTest.pm ============================================================================== --- (empty file) +++ p5ee/trunk/App-Context/t/AppSessionObjectTest.pm Tue Aug 22 14:54:16 2006 @@ -0,0 +1,17 @@ + +package AppSessionObjectTest; +use App::SessionObject; +@ISA = ("App::SessionObject"); + +sub hello { + return "hello"; +} + +sub finish_hello { + my ($self, $results) = @_; + my $context = $self->{context}; + $context->so_set("results", undef, $results); +} + +1; +