[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.50, Thu Dec 6 18:47:35 2007 UTC revision 1.51, Thu Dec 6 18:55:37 2007 UTC
# Line 1312  Line 1312 
1312                  $description_value = $cdd_obj->description;                  $description_value = $cdd_obj->description;
1313              }              }
1314          }          }
1315            elsif($db =~ /PFAM/){
1316                my ($new_id) = ($id) =~ /(.*?)_/;
1317                my $pfam_objs = $dbmaster->pfam->get_objects( { 'id' => $new_id } );
1318                if(!scalar(@$pfam_objs)){
1319                    $name_title = "name";
1320                    $name_value = "not available";
1321                    $description_title = "description";
1322                    $description_value = "not available";
1323                }
1324                else{
1325                    my $pfam_obj = $pfam_objs->[0];
1326                    $name_title = "name";
1327                    $name_value = $pfam_obj->term;
1328                    #$description_title = "description";
1329                    #$description_value = $pfam_obj->description;
1330                }
1331            }
1332    
1333          my $location =  $thing->start . " - " . $thing->stop;          my $location =  $thing->start . " - " . $thing->stop;
1334    

Legend:
Removed from v.1.50  
changed lines
  Added in v.1.51

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3