added a international name variable and accessor as this is the column which...

added a international name variable and accessor as this is the column which replaces chromosome in the new schema

modules/Bio/EnsEMBL/PerlDB/Contig.pm

@@ -68,6 +68,7 @@ sub new {
       _id            => undef,
       _version       => undef,
       _internal_id   => undef,
+      _international_name   => undef,		    
       _seq_date      => '',
       _embl_offset   => 0,
       _offset        => 0,
@@ -248,6 +249,7 @@ sub seq{
 
 sub id{
    my $obj = shift;
+   
    if( @_ ) {
        my $value = shift;
        $obj->{'_id'} = $value;
@@ -256,6 +258,16 @@ sub id{
    
 }
 
+
+sub international_name{
+   my($self, $arg);
+  
+   if($arg){
+      $self->{'_international_name'} = $arg;   
+   } 
+   return $self->{'_international_name'};
+}
+
 =head2 internal_id
 
  Title   : internal_id