In HTML::Widgets::NavMenu I have the following code: <<< sub get_coords_while_skipping_skips { my $self = shift;
my $callback = shift; my $coords = shift || $self->get_current_coords(); # line 571 >>> Now when I run the tests with Devel::Cover it reports the following for line 571 in the Condition Coverage: <<< A B dec 0 0 0 # marked as red. 0 1 1 1 X 1 >>> Now in order to eliminate the red I need to make sure both operands are False. However, $self->get_current_coords() cannot be false, and that's not what I'm using || for. It's not an if ( FOO || BAR ). It's instead something like that: <<< my $coords = shift; if (!$coords) { $coords = $self->get_current_coords(); } >>> Which would probably eliminate the problem, but is much less elegant. I should also note that I have many my @coords = @{shift || $self->get_current_coords}; statements which exhibit this problem. So what should I do to eliminate it? Thanks in advance, Shlomi Fish --------------------------------------------------------------------- Shlomi Fish [EMAIL PROTECTED] Homepage: http://www.shlomifish.org/ Tcl is LISP on drugs. Using strings instead of S-expressions for closures is Evil with one of those gigantic E's you can find at the beginning of paragraphs.