--- trunk/lib/Frey/Pipe.pm	2008/11/18 16:54:10	418
+++ trunk/lib/Frey/Pipe.pm	2008/11/18 17:11:08	420
@@ -41,6 +41,7 @@
 		warn "# part: '$part'";
 		if ( $part =~ m{^([^/]+)/([^\+\?]+)(.*)?$} ) {
 			my ( $class, $method, $args ) = ( $1, $2, $3 );
+			push @{ $self->status }, { $class => { method => $method, args => $args } };
 			my $params = $pipe;
 			$params = {} unless defined $params;
 			if ( defined $args ) {
@@ -70,6 +71,8 @@
 		}
 	}
 
+	warn "# pipe ", $self->title, dump( $self->status );
+
 	return $out;
 }