--- lib/PXElator/CouchDB.pm 2009/08/18 21:30:55 256 +++ lib/PXElator/CouchDB.pm 2009/08/18 21:37:49 257 @@ -131,7 +131,7 @@ my $caller; my $depth = 0; while ( my @c = caller($depth) ) { - push @$caller, [ @c ]; + push @$caller, [ splice(@c,0,4) ]; $depth++; }