use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");$C->{IFrameID} = "IFrameReleaseWarnings";$this->out("");{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("\n\n\n<div style=\"text-align:left\">\n");my $in = $C->{ReleaseWarnings};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{rw} = -1;for my $f (@$loop) {$C->{ITERATION}{rw}++;$C->{rw} = $f;$this->out("<div><b style=\"color:red\">$C->{rw}{datetime}</b>&nbsp;$C->{rw}{text}</div><br>\n");}$this->out("</div>\n\n");{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("");}