use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");$this->out(Zen::PerlHandler->get("II1b7f5cd35f00c93f234e8e1273dbac2a->mnt_registry")->do($this->{C}));$this->out("");if ( $C->{SpecfeatRegistry}{reflink} ) {$this->out("\n<script>\nfunction onOverride(control)\n{\n	document.getElementById(\'url_\' + control.id).disabled = control.checked ? false : true;\n}\n</script>\n\n");{my $G = (ref $this)->get("/headfoot/inner_header.html", $this->{param}) or die "no skel /headfoot/inner_header.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");{my $G = (ref $this)->get("/headfoot/inc_tinymce.html", $this->{param}) or die "no skel /headfoot/inc_tinymce.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");{my $G = (ref $this)->get("/headfoot/inc_closewindow.html", $this->{param}) or die "no skel /headfoot/inc_closewindow.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");$this->out(Zen::PerlHandler->get("II797d262ad279ea51b89c6cf64ccfe863->mnt_show_referer_links")->do($this->{C}));$this->out("\n");if ( $C->{HasReflinks} ) {$this->out("\n");if ( $C->{just_saved} ) {$this->out("		<div style=\"color: blue; font-size: 120\%\">\n		Referer`s links have been updated\n		</div><br>\n");}$this->out("\n	<form name=RefererLinks method=POST>\n	<table border=0 cellpadding=0 cellspacing=1 class=atkMainTable>\n	<tr>\n		<td class=atkHeader>Your Referer`s ($C->{Referer}{name} #$C->{Referer}{id}) Links:</td>\n	</tr>\n	<tr><td><table class=atkInnerTable cellpadding=4 cellspacing=3 width=\"100\%\">\n		<tr>\n			<td class=atkEditorRight>\n");my $in = $C->{Reflinks};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{reflink} = -1;for my $f (@$loop) {$C->{ITERATION}{reflink}++;$C->{reflink} = $f;$this->out("			\n			$C->{reflink}{introduction}<br>\n			\n");$C->{disabled} = $C->{reflink}{overridden} ? '' : 'disabled';;$this->out("			<input type=\"text\" size=\"20\" name=\"url_$C->{reflink}{id}\" id=\"url_$C->{reflink}{id}\" value=\"$C->{reflink}{url}\" $C->{disabled}><br>\n			\n");$C->{checked} = $C->{reflink}{overridden} ? 'checked' : '';;$this->out("			<input type=\"checkbox\" name=\"override_$C->{reflink}{id}\" id=\"$C->{reflink}{id}\" value=\"1\" onClick=\"onOverride(this)\" $C->{checked}>\n			I want to override this link<br><br>\n			\n");}$this->out("			</td>\n		</tr>\n	</table></td></tr>\n	<tr>\n		<td class=atkEditorControl>\n		<input class=\"\"btn btn-primary\"\" type=\"submit\" name=\"save\" value=\"Save\">\n		</td>\n	</tr>\n	</table>\n	</form>\n");}$this->out("\n<br><div id=\"Errors\" style=\"color: red\"></div><br>\n\n");$C->{TableTitle} = "My affiliate Links";$this->out("");$C->{TableClass} = II8dae0e141ee45f5daba6a74e4a7c3b6f::IIlIlIlIIIlIIlll($II8dae0e141ee45f5daba6a74e4a7c3b6f::IIlllIIIlIIIlIlI{$II720d6e18aa34327713eb014408fc9144::lIIlIIIIlllIlIII},488,$II8dae0e141ee45f5daba6a74e4a7c3b6f::IIlllIIIlIIIlIlI{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIllIlllllllII});$this->out("\n");{my $G = (ref $this)->get("/zen/table.html", $this->{param}) or die "no skel /zen/table.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");if ( $C->{too_many_reflinks} ) {$this->out("<script>\n	document.getElementById(\'Errors\').innerHTML = \'Only $C->{LimitForAffiliate} link(s) are allowed by admin\';\n</script>\n");}$this->out("\n");{my $G = (ref $this)->get("/headfoot/inc_closewindow.html", $this->{param}) or die "no skel /headfoot/inc_closewindow.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");{my $G = (ref $this)->get("/headfoot/inner_footer.html", $this->{param}) or die "no skel /headfoot/inner_footer.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");}$this->out("");}