Added db_display_name

modules/Bio/EnsEMBL/DBEntry.pm

@@ -82,7 +82,8 @@ sub new_fast {
                                                        -description => $description,
 						       -primary_id_linkable =>$primary_id_linkable,
 						       -display_id_linkable =>$display_id_linkable,
-						       -priority => $priority);
+						       -priority => $priority,
+						       -db_display_name => $db_display_name );
   Description: Creates a new DBEntry object
   Returntype : Bio::EnsEMBL::DBEntry
   Exceptions : none
@@ -97,10 +98,11 @@ sub new {
 
   my ( $adaptor, $dbID, $primary_id, $version,
        $dbname, $release, $display_id, $description,
-       $primary_id_linkable, $display_id_linkable, $priority) =
+       $primary_id_linkable, $display_id_linkable, $priority, $db_display_name) =
     rearrange ( ['ADAPTOR','DBID','PRIMARY_ID','VERSION',
                  'DBNAME','RELEASE','DISPLAY_ID','DESCRIPTION',
-		'PRIMARY_ID_LINKABLE','DISPLAY_ID_LINKABLE','PRIORITY'], @args );
+		 'PRIMARY_ID_LINKABLE','DISPLAY_ID_LINKABLE','PRIORITY',
+		 'DB_DISPLAY_NAME'], @args );
 
   $self->{'adaptor'} = $adaptor;
   $self->{'dbID'}    = $dbID;
@@ -115,6 +117,7 @@ sub new {
   if( defined $primary_id_linkable) { $self->primary_id_linkable($primary_id_linkable) }
   if( defined $display_id_linkable) { $self->display_id_linkable($display_id_linkable) }
   if( defined $priority) { $self->priority($priority) }
+  if( defined $db_display_name) { $self->db_display_name($db_display_name) }
   $self->{synonyms} = [];;
 
   return $self;
@@ -347,6 +350,26 @@ sub priority {
   return $self->{priority};
 }
 
+
+=head2 db_display_name
+
+  Arg [1]    : String $db_display_name
+  Example    : none
+  Db_display_name: get/set for attribute db_display_name
+  Returntype : string
+  Exceptions : none
+  Caller     : general
+
+=cut
+
+sub db_display_name {
+  my ( $self, $arg ) = @_;
+  if( defined $arg ) {
+    $self->{db_display_name} = $arg;
+  } 
+  return $self->{db_display_name};
+}
+
 =head2 add_synonym
 
   Arg  1     : string $synonym

modules/Bio/EnsEMBL/DBSQL/DBEntryAdaptor.pm

@@ -65,7 +65,7 @@ sub fetch_by_dbID {
    "SELECT xref.xref_id, xref.dbprimary_acc, xref.display_label,
            xref.version, xref.description,
            exDB.dbprimary_acc_linkable, exDB.display_label_linkable, exDB.priority,
-           exDB.db_name, exDB.release, es.synonym
+           exDB.db_name, exDB.db_display_name, exDB.release, es.synonym
     FROM   xref, external_db exDB
     LEFT JOIN external_synonym es on es.xref_id = xref.xref_id
     WHERE  xref.xref_id = ?
@@ -78,7 +78,7 @@ sub fetch_by_dbID {
   while ( my $arrayref = $sth->fetchrow_arrayref()){
     my ( $refID, $dbprimaryId, $displayid, $version, $desc,
 	 $primary_id_linkable, $display_id_linkable, $priority,
-         $dbname, $release, $synonym) = @$arrayref;
+         $dbname, $db_display_name, $release, $synonym) = @$arrayref;
 
     if(!$exDB) {
       $exDB = Bio::EnsEMBL::DBEntry->new
@@ -91,7 +91,8 @@ sub fetch_by_dbID {
           -dbname => $dbname,
 	  -primary_id_linkable => $primary_id_linkable,
 	  -display_id_linkable => $display_id_linkable,
-	  -priority => $priority);
+	  -priority => $priority,
+	  -db_display_name => $db_display_name);
 
       $exDB->description( $desc ) if ( $desc );
     }
@@ -132,7 +133,7 @@ sub fetch_by_db_accession {
    "SELECT xref.xref_id, xref.dbprimary_acc, xref.display_label,
            xref.version, xref.description,
            exDB.dbprimary_acc_linkable, exDB.display_label_linkable, exDB.priority,
-           exDB.db_name, exDB.release, es.synonym
+           exDB.db_name, exDB.db_display_name, exDB.release, es.synonym
     FROM   xref, external_db exDB
     LEFT JOIN external_synonym es on es.xref_id = xref.xref_id
     WHERE  xref.dbprimary_acc = ?
@@ -158,7 +159,7 @@ sub fetch_by_db_accession {
   my $exDB;
 
   while ( my $arrayref = $sth->fetchrow_arrayref()){
-    my ( $dbID, $dbprimaryId, $displayid, $version, $desc, $dbname,
+    my ( $dbID, $dbprimaryId, $displayid, $version, $desc, $dbname,$db_display_name,
 	 $primary_id_linkable, $display_id_linkable, $priority,
          $release, $synonym) = @$arrayref;
 
@@ -173,7 +174,8 @@ sub fetch_by_db_accession {
           -dbname => $dbname,
 	  -primary_id_linkable => $primary_id_linkable,
 	  -display_id_linkable => $display_id_linkable,
-	  -priority => $priority);
+	  -priority => $priority,
+	  -db_display_name=>$db_display_name);
 
       $exDB->description( $desc ) if ( $desc );
     }