X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FPresenter.pm;h=cd4f4e17e97aa2d5d9a48ad4a7612265162c2d16;hb=74bb69c3f2e11295d313cbeacd9e061c780ef588;hp=d8add637898cf9dc158f0e00cd8259cb04947284;hpb=287e81e0c99c7e203b9c78bcd6a1cf1a7c28d6f6;p=kivitendo-erp.git

diff --git a/SL/Presenter.pm b/SL/Presenter.pm
index d8add6378..cd4f4e17e 100644
--- a/SL/Presenter.pm
+++ b/SL/Presenter.pm
@@ -7,15 +7,29 @@ use parent qw(Rose::Object);
 use Carp;
 use Template;
 
+use SL::Presenter::Chart;
 use SL::Presenter::CustomerVendor;
 use SL::Presenter::DeliveryOrder;
 use SL::Presenter::EscapedText;
 use SL::Presenter::Invoice;
+use SL::Presenter::GL;
+use SL::Presenter::Letter;
 use SL::Presenter::Order;
+use SL::Presenter::Part;
 use SL::Presenter::Project;
 use SL::Presenter::Record;
+use SL::Presenter::RequirementSpec;
+use SL::Presenter::RequirementSpecItem;
+use SL::Presenter::RequirementSpecTextBlock;
+use SL::Presenter::SepaExport;
+use SL::Presenter::ShopOrder;
 use SL::Presenter::Text;
 use SL::Presenter::Tag;
+use SL::Presenter::BankAccount;
+
+use Rose::Object::MakeMethods::Generic (
+  scalar => [ qw(need_reinit_widgets) ],
+);
 
 sub get {
   return $::request->presenter;
@@ -100,6 +114,8 @@ sub render {
 sub get_template {
   my ($self) = @_;
 
+  # Make locales.pl parse generic/exception.html, too:
+  # $::form->parse_html_template("generic/exception")
   $self->{template} ||=
     Template->new({ INTERPOLATE  => 0,
                     EVAL_PERL    => 0,
@@ -110,6 +126,7 @@ sub get_template {
                     COMPILE_EXT  => '.tcc',
                     COMPILE_DIR  => $::lx_office_conf{paths}->{userspath} . '/templates-cache',
                     ERROR        => 'templates/webpages/generic/exception.html',
+                    ENCODING     => 'utf8',
                   }) || croak;
 
   return $self->{template};
@@ -244,13 +261,17 @@ the following variables:
 
 =item * C<AUTH> -- C<$::auth>
 
+=item * C<FLASH> -- the flash instance (C<$::form-E<gt>{FLASH}>)
+
 =item * C<FORM> -- C<$::form>
 
+=item * C<INSTANCE_CONF> -- C<$::instance_conf>
+
 =item * C<LOCALE> -- C<$::locale>
 
 =item * C<LXCONFIG> -- all parameters from C<config/kivitendo.conf>
 with the same name they appear in the file (first level is the
-section, second the actual variable, e.g. C<system.dbcharset>,
+section, second the actual variable, e.g. C<system.language>,
 C<features.webdav> etc)
 
 =item * C<LXDEBUG> -- C<$::lxdebug>
@@ -259,6 +280,9 @@ C<features.webdav> etc)
 
 =item * C<SELF> -- the controller instance
 
+=item * C<PRESENTER> -- the presenter instance the template is
+rendered with
+
 =item * All items from C<%locals>
 
 =back