X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/5e7090a6c633328b8d884341b8452041e30bfce1..b3e5100711d6378ba5bdc09a0355488e79048acf:/SL/Template/Plugin/T8.pm

diff --git a/SL/Template/Plugin/T8.pm b/SL/Template/Plugin/T8.pm
index 6c584d72c..ca62e8604 100644
--- a/SL/Template/Plugin/T8.pm
+++ b/SL/Template/Plugin/T8.pm
@@ -1,14 +1,19 @@
 package SL::Template::Plugin::T8;
 
 use strict;
+use parent qw( Template::Plugin::Filter );
 
-use Template::Plugin::Filter;
-use base qw( Template::Plugin::Filter );
+my $cached_instance;
+
+sub new {
+  my ($class) = shift;
+
+  return $cached_instance ||= $class->SUPER::new(@_);
+}
 
 sub init {
   my $self = shift;
 
-  # first arg can specify filter name
   $self->install_filter($self->{ _ARGS }->[0] || 'T8');
 
   return $self;