--- trunk/lib/Frey/Pipe.pm	2008/11/17 22:40:22	386
+++ trunk/lib/Frey/Pipe.pm	2008/11/18 02:17:06	401
@@ -1,6 +1,7 @@
 package Frey::Pipe;
 use Moose;
 extends 'Frey';
+with 'Frey::Web';
 
 use Frey::Action;
 
@@ -43,6 +44,7 @@
 			if ( defined $args ) {
 				$args =~ s{^[\?\+\s]}{};
 				warn "# class $class method $method args '$args'", $pipe ? " pipe args " . join(',',keys %$pipe) : '' if $self->debug;
+				push @{ $self->status }, { $class =>$args };
 				map {
 					my ( $name, $value ) = ( $1, $2 ) if m{^([^=]+)=(.+)$} || confess "can't parse '$_'";
 					$params->{$name} = $value;