use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");$this->out(Zen::PerlHandler->get("IIc7a1102a58c38cc35c941ca362362583->mnt_login")->do($this->{C}));$this->out("\n<div id=\"main_section\">\n<center>\n\n<br><br>\n\n");if ( $C->{Error} ) {$this->out("  <p align=center><span style=\"color: red\">Authorization error</span></p>\n");}$this->out("\n<form name=LoginForm method=post action=\"$C->{SELF_URL_NO_QS}\">\n<input type=hidden name=\"cgi_ret\" value=\"$C->{INPUT}{cgi_ret}\">\n\n<div id=\"login_form\">\n<ul>\n	<li class=\"heading\">\n		<h3>Authorization</h3>\n	</li>\n	<li>\n		<p>\n			<span class=\"left\">E-mail</span>\n			<span class=\"right\"><input type=text tabIndex=1 size=20 maxsize=30 name=login value=\"$C->{INPUT}{login}\"></span>\n		</p>\n		<p>\n			<span class=\"left\">Password</span>\n			<span class=\"right\">\n				<input type=password tabIndex=2 size=20 maxsize=30 name=passwd value=\"$C->{INPUT}{passwd}\"><br>\n    			<small><a href=\"#\" onClick=\"document.location = \'$C->{SYS}{URI}/ds/remindpasswd.html?email=\' + escape(document.forms[\'LoginForm\'].elements[\'login\'].value)\">Forgotten password?</a></small>\n    		</span>\n		</p>\n	</li>\n	<li>\n		<p>\n			<input type=checkbox tabIndex=3 name=longlife value=1> remember me<br>\n			<input class=\"\"btn btn-primary\"\" type=\"submit\" tabIndex=\"4\" name=\"do_login\" value=\"Log in\">\n		<p>\n	</li>\n</ul>\n</div>\n\n</form>\n\n<script>\n  document.forms[\'LoginForm\'].elements[\'login\'].focus();\n</script>\n\n<br><br>\n\n</center>\n</div>\n\n");{my $G = (ref $this)->get("/ds/headfoot.html", $this->{param}) or die "no skel /ds/headfoot.html";my $out1 = $this->getOutput;$C->{central_content} = join('', @$out1);@$out1 = ();my $out2 = $G->execute($C);$this->out(@$out2) if $out2;}$this->out("");}