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;
$m->debug_hook( $m->current_comp->path ) if ( HTML::Mason::Compiler::IN_PERL_DB() );

#line 1 "/home/production/cxgn/sgn/mason/search/cross/progeny_search_section.mas"
$m->print( '
<td>
    <a href="/search/progenies_using_female"><p>Search Progenies of Female Parents</p></a>
</td>
<td>
    <a href="/search/progenies_using_male"><p>Search Progenies of Male Parents / Populations</p></a>
</td>
' );
;return;
},
'load_time' => 1763180870,

)
;