package SGN::View::Mason::Commands;
use strict;
use vars qw($m $c);
HTML::Mason::Component::FileBased->new(
'code' => sub {
use utf8; local $SGN::View::Mason::Commands::m = $HTML::Mason::Commands::m;
HTML::Mason::Exception::Params->throw
    ( error =>
      "Odd number of parameters passed to component expecting name/value pairs"
    ) if @_ % 2;
my ( $name, $common_name, $taxon, $description, @synonyms );
{
    my %pos;
    for ( my $x = 0; $x < @_; $x += 2 )
    {
        $pos{ $_[$x] } = $x + 1;
    }

    foreach my $arg ( qw( name common_name ) )
    {
        HTML::Mason::Exception::Params->throw
            ( error => "no value sent for required parameter '$arg'" )
                unless exists $pos{$arg};
    }
#line 7 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
    $name = $_[ $pos{'name'} ];
#line 8 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
    $common_name = $_[ $pos{'common_name'} ];
#line 9 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
     $taxon = exists $pos{'taxon'} ? $_[ $pos{'taxon'} ] :  '';
#line 10 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
     $description = exists $pos{'description'} ? $_[ $pos{'description'} ] :  '';
#line 11 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
     @synonyms = exists $pos{'synonyms'} ? HTML::Mason::Tools::coerce_to_array( $_[ $pos{'synonyms'} ], '@synonyms') :  ();
}
$m->debug_hook( $m->current_comp->path ) if ( HTML::Mason::Compiler::IN_PERL_DB() );

#line 1 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->print( '
' );
#line 5 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->print( '
' );
#line 13 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->print( '
' );
#line 14 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"

$name = $name.($taxon ? " ($taxon)" : '');
my $synonym_list = join ", ", @synonyms;
#line 18 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->print( '

' );
#line 20 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->comp(   '/page/info_table.mas',     
   data => [ 'Scientific Name' => $name,
             'Common name'     => $common_name,
             'Description'     => $description,
             'Synonyms'        => $synonym_list ],
  border => 0,
	       
  
); #line 27 "/home/production/cxgn/sgn/mason/organism/basic_info.mas"
$m->print( '


' );
;return;
},
'declared_args' => {
  '$common_name' => { default => undef },
  '$description' => { default => ' \'\'' },
  '$name' => { default => undef },
  '$taxon' => { default => ' \'\'' },
  '@synonyms' => { default => ' ()' }
},
'load_time' => 1763108195,

)
;