Allow TinyTranscript to have biotype.

modules/Bio/EnsEMBL/IdMapping/Cache.pm

@@ -320,8 +320,9 @@ sub build_cache_from_genes {
                                $tr->modified_date, $tr->start,
                                $tr->end,           $tr->strand,
                                $tr->length, md5_hex( $tr->spliced_seq ),
-                               ( $tr->is_known ? 1 : 0 ), ] );
+                               ( $tr->is_known ? 1 : 0 ) ] );
 
+      $ltr->biotype( $tr->biotype() );
       $lgene->add_Transcript($ltr);
 
       # build transcript caches

modules/Bio/EnsEMBL/IdMapping/TinyTranscript.pm

@@ -71,6 +71,7 @@ package Bio::EnsEMBL::IdMapping::TinyTranscript;
 # 10  is_known
 # 11  translation
 # 12  [exons]
+# 13  biotype
 
 
 use strict;
@@ -287,6 +288,12 @@ sub get_all_Exons {
   return $_[0]->[12] || [];
 }
 
+sub biotype {
+  my $self = shift;
+  $self->[13] = shift if (@_);
+  return $self->[13];
+}
+
 
 1;