[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.75, Thu Feb 5 18:54:17 2009 UTC revision 1.76, Fri Mar 20 18:35:46 2009 UTC
# Line 2294  Line 2294 
2294    
2295          # get the linked fig id          # get the linked fig id
2296          my $anchor_link = "graph_" . $replace_id;          my $anchor_link = "graph_" . $replace_id;
2297          my $fig_data =  "<table><tr><td><a href='?page=Annotation&feature=$id'>$id</a></td>" . "&nbsp;" x 2;  
2298            my $fig_data;
2299            if ($id =~ /^fig\|/)
2300            {
2301                $fig_data =  "<table><tr><td><a href='?page=Annotation&feature=$id'>$id</a></td>" . "&nbsp;" x 2;
2302            }
2303            else
2304            {
2305                my $url_link = &HTML::set_prot_links($cgi,$id);
2306                $fig_data = "<table><tr><td>$url_link</td>". "&nbsp;" x 2;
2307            }
2308          $fig_data .= qq(<td><img height='10px' width='20px' src='$FIG_Config::cgi_url/Html/anchor_alignment.png' alt='View Graphic View of Alignment' onClick='changeSimsLocation("$anchor_link", 0)'/></td></tr></table>);          $fig_data .= qq(<td><img height='10px' width='20px' src='$FIG_Config::cgi_url/Html/anchor_alignment.png' alt='View Graphic View of Alignment' onClick='changeSimsLocation("$anchor_link", 0)'/></td></tr></table>);
2309          my $fig_col = {'data'=> $fig_data,          my $fig_col = {'data'=> $fig_data,
2310                         'highlight'=>$white};                         'highlight'=>$white};
# Line 2513  Line 2523 
2523      my $organism = $fig->org_of($id);      my $organism = $fig->org_of($id);
2524      my $single_domain = [];      my $single_domain = [];
2525    
2526      # organisms cell      # organisms cell comehere2
2527      my ($org, $org_color) = $fig->org_and_color_of($id);      my ($org, $org_color) = $fig->org_and_color_of($id);
2528      my $org_cell = { 'data' =>  $organism, 'highlight' => $org_color};      my $org_cell = { 'data' =>  $organism, 'highlight' => $org_color};
2529    
2530      # get the linked fig id      # get the linked fig id
2531      my $fig_data =  "<a href='?page=Annotation&feature=$id'>$id</a>";      my $fig_data;
2532        if ($id =~ /^fig\|/)
2533        {
2534            $fig_data =  "<a href='?page=Annotation&feature=$id'>$id</a>";
2535        }
2536        else
2537        {
2538            my $url_link = &HTML::set_prot_links($cgi,$id);
2539            $fig_data = "<table><tr><td>$url_link</td>". "&nbsp;" x 2;
2540        }
2541    
2542      my $fig_col = {'data'=> $fig_data,      my $fig_col = {'data'=> $fig_data,
2543                     'highlight'=>"#ffffff"};                     'highlight'=>"#ffffff"};
2544    

Legend:
Removed from v.1.75  
changed lines
  Added in v.1.76

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3