[Bio] / FigKernelPackages / Observation.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/Observation.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.26, Wed Jul 25 16:52:04 2007 UTC revision 1.27, Wed Jul 25 17:06:40 2007 UTC
# Line 1062  Line 1062 
1062  sub display {  sub display {
1063      my ($thing,$gd) = @_;      my ($thing,$gd) = @_;
1064      my $lines = [];      my $lines = [];
1065      my $line_config = { 'title' => $thing->acc,  #    my $line_config = { 'title' => $thing->acc,
1066                          'short_title' => $thing->type,  #                       'short_title' => $thing->type,
1067                          'basepair_offset' => '1' };  #                       'basepair_offset' => '1' };
1068      my $color = "4";      my $color = "4";
1069    
1070      my $line_data = [];      my $line_data = [];
# Line 1094  Line 1094 
1094          }          }
1095      }      }
1096    
1097        my $line_config = { 'title' => $thing->acc,
1098                            'short_title' => $name_value,
1099                            'basepair_offset' => '1' };
1100    
1101      my $name;      my $name;
1102      $name = {"title" => $name_title,      $name = {"title" => $name_title,
1103               "value" => $name_value};               "value" => $name_value};

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3