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;
[EMAIL PROTECTED] = ("App::SessionObject");
+
+sub hello {
+ return "hello";
+}
+
+sub finish_hello {
+ my ($self, $results) = @_;
+ my $context = $self->{context};
+ $context->so_set("results", undef, $results);
+}
+
+1;
+
