use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");$C->{menu} = do { $ENV{JIN_TMPL} =~ /(\w+)\.html/; $1; };$this->out("");$C->{selected} = { "$C->{menu}", qq(class="active") };$this->out("<li $C->{selected}{sites}><a href=\"$C->{SYS}{URL}/ds/sites.html\"><span>SITES</span></a></li>\n<li $C->{selected}{sales}><a href=\"$C->{SYS}{URL}/ds/sales.html\"><span>SALES</span></a></li>\n<li $C->{selected}{users}><a href=\"$C->{SYS}{URL}/ds/users.html\"><span>USERS</span></a></li>\n<li $C->{selected}{affiliates}><a href=\"$C->{SYS}{URL}/ds/affiliates.html\"><span>AFFILIATES</span></a></li>\n<li $C->{selected}{plans}><a href=\"$C->{SYS}{URL}/ds/plans.html\"><span>PLANS</span></a></li>\n<li $C->{selected}{pages}><a href=\"$C->{SYS}{URL}/ds/pages.html\"><span>PAGES</span></a></li>\n<li $C->{selected}{followup}><a href=\"$C->{SYS}{URL}/ds/followup.html\"><span>FOLLOW UP</span></a></li>\n<li $C->{selected}{settings}><a href=\"$C->{SYS}{URL}/ds/settings.html\"><span>SETTINGS</span></a></li>\n");}