Commit 706dd65f authored by Web Group's avatar Web Group
Browse files

use parent does inheritence, too. (ds23).

parent 6e7a0a8f
......@@ -248,7 +248,7 @@ sub inheritance_action {
my @parents = $line =~ /Bio::EnsEMBL::[\w:]+/g;
push @inheritance,@parents;
}
elsif ($line =~ /use base/) {
elsif ($line =~ /use base/ or $line =~ /use parent/) {
my @parents = $line =~ /Bio::EnsEMBL::[\w:]+/g;
push @inheritance,@parents;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment