Searched refs:hasPocket (Results 1 – 2 of 2) sorted by relevance
355 hasPocket => 1,389 sub hasPocket subroutine391 return $_[0]-> {hasPocket} unless $#_;393 $self-> {hasPocket} = $v;509 if ( !$self-> {hasPocket} || ( $border >= $majExt)) {511 my $nb = ( $self-> {hasPocket} ? $border : $majExt) - $total;689 unless ( $self-> {hasPocket}) {747 if ( $self-> {hasPocket}) {846 hasPocket => 0,
77 hasPocket => 0,