← Back to branch summary

~ubuntu-branches/ubuntu/trusty/bioperl/trusty

« back to all changes in this revision

Viewing changes to t/Ontology/IO/go.t

  • Committer: Package Import Robot
  • Author(s): Charles Plessy
  • Date: 2013-09-22 13:39:48 UTC
  • mfrom: (3.1.11 sid)
  • Revision ID: package-import@ubuntu.com-20130922133948-c6z62zegjyp7ztou
Tags: 1.6.922-1
http://bugs.debian.org/722910
* New upstream release.
* Replaces and Breaks grinder (<< 0.5.3-3~) because of overlaping contents.
  Closes: #722910
* Stop Replacing and Breaking bioperl ( << 1.6.9 ): not needed anymore. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/Ontology/IO/go.t
239
239
# helper functions
240
240
#################################################################
241
241
 
242
 
sub goid { num ( $a->GO_id() ) <=> num ( $b->GO_id() ) }
243
 
 
244
 
sub child_goid { num ( $a->child_term()->GO_id() ) <=> num ( $b->child_term()->GO_id() ) }
245
 
 
246
 
sub num {
 
242
sub goid { snum ( $a->GO_id() ) <=> snum ( $b->GO_id() ) }
 
243
 
 
244
sub child_goid { snum ( $a->child_term()->GO_id() ) <=> snum ( $b->child_term()->GO_id() ) }
 
245
 
 
246
sub snum {
247
247
    my $x = shift( @_ );
248
248
    $x =~ s/\D+//g;
249
249
    return $x;