X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0f179c9ab60ac22c697027cadc9f4bdb9c515ce5..0e723a19cf157a78a57458dda69fd1ea36e68ea1:/SL/Controller/Layout/Base.pm diff --git a/SL/Controller/Layout/Base.pm b/SL/Controller/Layout/Base.pm index 1a27174b5..ed8701947 100644 --- a/SL/Controller/Layout/Base.pm +++ b/SL/Controller/Layout/Base.pm @@ -97,7 +97,6 @@ sub use_javascript { sub javascripts { my ($self) = @_; - $::lxdebug->dump(0, "called", [ map { $self->find_javascript($_) } $self->use_javascript ]); return map { $self->_find_javascript($_) } $self->use_javascript; } @@ -108,4 +107,17 @@ sub _find_javascript { return $javascript if -f $javascript; } + +############################################ +# track state of form header +############################################ + +sub header_done { + $_[0]{_header_done} = 1; +} + +sub need_footer { + $_[0]{_header_done}; +} + 1;