[Bioperl-guts-l] bioperl-live/t DB.t,1.49,1.50

[Brian Osborne]

Update of /home/repository/bioperl/bioperl-live/t
In directory pub.open-bio.org:/tmp/cvs-serv31675/t

Modified Files:
	DB.t 
Log Message:
I count 28 dblinks


Index: DB.t
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/t/DB.t,v
retrieving revision 1.49
retrieving revision 1.50
diff -C2 -d -r1.49 -r1.50
*** DB.t	9 May 2005 08:59:45 -0000	1.49
--- DB.t	31 Aug 2005 11:38:34 -0000	1.50
***************
*** 145,149 ****
     # small chance this might change but hopefully not
     my @annot = $seq->annotation->get_Annotations('dblink');
!    ok(scalar @annot, 27); # sure enough it did change on 05/01/05 ...
     ok($annot[0]->database, 'swissprot');
     ok($annot[0]->primary_id, '2AAA_YEAST');
--- 145,149 ----
     # small chance this might change but hopefully not
     my @annot = $seq->annotation->get_Annotations('dblink');
!    ok(scalar @annot, 28); #
     ok($annot[0]->database, 'swissprot');
     ok($annot[0]->primary_id, '2AAA_YEAST');