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 ( @usernames, $logins );
{
    my %pos;
    for ( my $x = 0; $x < @_; $x += 2 )
    {
        $pos{ $_[$x] } = $x + 1;
    }
#line 3 "/home/production/cxgn/sgn/mason/site/status.mas"
     @usernames = exists $pos{'usernames'} ? HTML::Mason::Tools::coerce_to_array( $_[ $pos{'usernames'} ], '@usernames') :  ();
#line 4 "/home/production/cxgn/sgn/mason/site/status.mas"
     $logins = exists $pos{'logins'} ? $_[ $pos{'logins'} ] :  {};
}
$m->debug_hook( $m->current_comp->path ) if ( HTML::Mason::Compiler::IN_PERL_DB() );

#line 1 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '
' );
#line 6 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '
' );
#line 7 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->comp(   '/page/page_title.mas', title=>"Site Status"   
); #line 7 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '

' );
#line 9 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->comp( { content => sub {
#line 9 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '

' );
#line 11 "/home/production/cxgn/sgn/mason/site/status.mas"
 foreach my $ut (keys %{$logins->{detailed}}) { 
$m->print( '  <br />
  <b>' );
#line 13 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print(  $ut  );
#line 13 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '</b><br />
  
' );
#line 15 "/home/production/cxgn/sgn/mason/site/status.mas"
   foreach my $un (keys %{$logins->{detailed}->{$ut}}) { 
$m->print( '     ' );
#line 16 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print(  $un  );
#line 16 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '<br />
' );
#line 17 "/home/production/cxgn/sgn/mason/site/status.mas"
   }
 }
$m->print( '

' );
#line 21 "/home/production/cxgn/sgn/mason/site/status.mas"
} }, '/page/info_section.mas', title=>"Logins"
 );
#line 21 "/home/production/cxgn/sgn/mason/site/status.mas"
$m->print( '

' );
;return;
},
'declared_args' => {
  '$logins' => { default => ' {}' },
  '@usernames' => { default => ' ()' }
},
'load_time' => 1763132939,

)
;