[Bioperl-guts-l] bioperl-live/t Signalp.t,1.2,1.3

Christopher John Fields cjfields at dev.open-bio.org
Wed Mar 21 00:14:37 EDT 2007


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

Modified Files:
	Signalp.t 
Log Message:
Now passes v3 tests (at least the v3 output we have...)

Index: Signalp.t
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/t/Signalp.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Signalp.t	15 Mar 2007 14:20:20 -0000	1.2
--- Signalp.t	21 Mar 2007 04:14:35 -0000	1.3
***************
*** 15,19 ****
  	}
  	use Test::More;
! 	plan tests => 9;
      use_ok('Bio::Tools::Signalp');
      use_ok('Bio::Root::IO');
--- 15,19 ----
  	}
  	use Test::More;
! 	plan tests => 12;
      use_ok('Bio::Tools::Signalp');
      use_ok('Bio::Root::IO');
***************
*** 54,62 ****
  # 
  
! #while ( my $feat = $parser->next_result ) {
! #  push @feat, $feat;
! #}
! #ok @feat == 1;
! #ok $parser->_seqname, 'my_fasta_id';
! #ok $parser->_fact1,   'YES';
  
--- 54,62 ----
  # 
  
! while ( my $feat = $parser->next_result ) {
!   push @feat, $feat;
! }
! is @feat , 1;
! is $parser->_seqname, 'my_fasta_id';
! is $parser->_fact1,   'YES';
  



More information about the Bioperl-guts-l mailing list