X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c1569bc195865fa5c25c6945bbad78c872fa2046..be60b289f589a8d4cad16c75734d078cd34b8264:/SL/Presenter.pm?ds=inline

diff --git a/SL/Presenter.pm b/SL/Presenter.pm
index 67b37df5c..cd4f4e17e 100644
--- a/SL/Presenter.pm
+++ b/SL/Presenter.pm
@@ -7,19 +7,25 @@ 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) ],
@@ -108,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,