[Bioperl-guts-l] bioperl-live/t BioDBGFF.t,1.34,1.35

[Lincoln Stein]

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

Modified Files:
	BioDBGFF.t 
Log Message:
multiple tweaks to make glyphs and aggregators more SO compliant


Index: BioDBGFF.t
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/t/BioDBGFF.t,v
retrieving revision 1.34
retrieving revision 1.35
diff -C2 -d -r1.34 -r1.35
*** BioDBGFF.t	20 Jun 2004 22:09:54 -0000	1.34
--- BioDBGFF.t	5 Apr 2005 22:16:56 -0000	1.35
***************
*** 111,115 ****
  my $att = $t->attributes;
  ok(scalar @{$att->{Gene}},2);
! @t = sort $db->fetch_feature_by_attribute('Gene'=>'abc-1');
  ok(@t>0);
  ok($t[0] eq $t);
--- 111,115 ----
  my $att = $t->attributes;
  ok(scalar @{$att->{Gene}},2);
! @t = sort {$a->display_name cmp $b->display_name} $db->fetch_feature_by_attribute('Gene'=>'abc-1');
  ok(@t>0);
  ok($t[0] eq $t);