merge dalla branch

git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@191 fcb26f47-9200-0410-b104-b98ab5b095f3

1 files changed, 32 insertions, 0 deletions

diff --git a/GroLUG/lib/Catalyst/Engine/Null.pm b/GroLUG/lib/Catalyst/Engine/Null.pm
new file mode 100644
index 0000000..2b910c2
--- /dev/null
+++ b/GroLUG/lib/Catalyst/Engine/Null.pm
@@ -0,0 +1,32 @@
+package Catalyst::Engine::Null;
+
+use strict;
+use base 'Catalyst::Engine';
+use Catalyst::Utils;
+use NEXT;
+use URI;
+
+sub finalize_body  { print STDERR "finalize_body\n"};
+sub finalize_cookies  { print STDERR "finalize_cookies\n"};
+sub finalize_error  { print STDERR "finalize_error\n"};
+sub finalize_read  { print STDERR "finalize_read\n"};
+sub finalize_uploads  { print STDERR "finalize_uploads\n"};
+
+sub prepare_request  { print STDERR "prepare_request\n"};
+sub prepare_query_parameters  { print STDERR "prepare_query_parameters\n"};
+sub prepare_read  { print STDERR "prepare_read\n"};
+sub prepare_uploads  { print STDERR "prepare_uploads\n"};
+sub prepare_path {
+    print STDERR "prepare_path\n";
+    my ($self,$c)=@_;
+    $c->request->uri(URI->new('/'));
+    $c->request->base(URI->new('/'));
+}
+
+sub read  { print STDERR "read\n"; '' };
+sub read_chunk  { print STDERR "read_chunk\n"; '' };
+
+sub write  { print STDERR "write\n"};
+
+1;
+