*** Bio/Tools/Primer3.pm.orig	Mon May 17 05:41:26 2004
--- Bio/Tools/Primer3.pm	Mon Jun 13 11:47:52 2005
***************
*** 183,195 ****
   Function: Retrieve the number of primers returned from Primer3.
   Returns : A scalar
   Args    : None
!  Notes   : Returns the maximum number of primers returned from Primer3.
  
  =cut
  
  sub number_of_results {
   my $self=shift;
!  return $self->{'maximum_primers_returned'};
  }
  
  
--- 183,199 ----
   Function: Retrieve the number of primers returned from Primer3.
   Returns : A scalar
   Args    : None
!  Notes   : This returns the count of the primers returned by Primer3 
!            (aka how many of them there are). 
!  
!            This is one more than the maximum offset into the zero 
!            based list of primers that is accessed by primer_results().
  
  =cut
  
  sub number_of_results {
   my $self=shift;
!  return $self->{'maximum_primers_returned'} + 1;
  }