- my @sidejoins=((scalar(@leftjoins) > scalar(@rightjoins)) ? @leftjoins : @rightjoins);
- my @alljoins=(@newjoins, @sidejoins);
- return($str, @alljoins);
+ my @oldout=@outjoins;
+ @outjoins = (@leftjoins, @outjoins, @rightjoins);
+ if($op)
+ {
+ print "ME (", (defined($op) ? $op->{name} : ""), "): ";
+ print(scalar(@outjoins), " = " , scalar(@leftjoins), " + ", scalar(@oldout),
+ " + ", scalar(@rightjoins), "\n");
+ }
+ return($str, @outjoins);