Das Modul HTML::Template wird nicht mehr benötigt.
authorMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 1 Nov 2007 12:40:36 +0000 (12:40 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 1 Nov 2007 12:40:36 +0000 (12:40 +0000)
SL/Form.pm
SL/InstallationCheck.pm
doc/INSTALL

index 0445a25..951b850 100644 (file)
@@ -39,7 +39,6 @@ package Form;
 use Data::Dumper;
 
 use Cwd;
-use HTML::Template;
 use Template;
 use SL::Template;
 use CGI::Ajax;
@@ -547,37 +546,6 @@ sub _prepare_html_template {
   return $file;
 }
 
-sub parse_html_template {
-  $main::lxdebug->enter_sub();
-
-  my ($self, $file, $additional_params) = @_;
-
-  $additional_params ||= { };
-
-  $file = $self->_prepare_html_template($file, $additional_params);
-
-  my $template = HTML::Template->new("filename" => $file,
-                                     "die_on_bad_params" => 0,
-                                     "strict" => 0,
-                                     "case_sensitive" => 1,
-                                     "loop_context_vars" => 1,
-                                     "global_vars" => 1);
-
-  foreach my $key ($template->param()) {
-    my $param = $additional_params->{$key} || $self->{$key};
-    $param = [] if (($template->query("name" => $key) eq "LOOP") && (ref($param) ne "ARRAY"));
-    $template->param($key => $param);
-  }
-
-  my $output = $template->output();
-
-  $output = $main::locale->{iconv}->convert($output) if ($main::locale);
-
-  $main::lxdebug->leave_sub();
-
-  return $output;
-}
-
 sub parse_html_template2 {
   $main::lxdebug->enter_sub();
 
index 2c92136..e82298e 100644 (file)
@@ -8,7 +8,6 @@ use vars qw(@required_modules);
   { "name" => "CGI::Ajax", "url" => "http://search.cpan.org/~bct/" },
   { "name" => "DBI", "url" => "http://search.cpan.org/~timb/" },
   { "name" => "DBD::Pg", "url" => "http://search.cpan.org/~dbdpg/" },
-  { "name" => "HTML::Template", "url" => "http://search.cpan.org/~samtregar/" },
   { "name" => "Archive::Zip", "url" => "http://search.cpan.org/~adamk/" },
   { "name" => "Text::Iconv", "url" => "http://search.cpan.org/~mpiotr/" },
   { "name" => "Time::HiRes", "url" => "http://search.cpan.org/~jhi/" },
index b259ce0..cc0798f 100644 (file)
@@ -29,7 +29,6 @@ Standard-Perl-Installation sind:
 
 * DBI
 * DBD::Pg
-* HTML::Template
 * CGI::Ajax
 * Class::Accessor
 * Archive::Zip
@@ -45,7 +44,7 @@ hei
 Für Debian beötigen Sie diese Pakete:
 
   apache, postgresql, libdbi-perl, libdbd-pg-perl, libpgperl,
-  libhtml-template-perl, libclass-accessor-perl, libarchive-zip-perl,
+  libclass-accessor-perl, libarchive-zip-perl,
   libtext-iconv-perl, libyaml-perl, libtext-csv-perl,
   libio-stringy-perl, libtemplate-perl
 
@@ -57,7 +56,7 @@ F
 
   apache2, postgresql-server, perl-DBI, perl-DBD-Pg, perl-Archive-Zip,
   perl-Class-Accessor, perl-Text-Iconv, perl-Text-CSV_XS,
-  perl-HTML-Template, perl-IO-stringy, perl-Template-Toolkit
+  perl-IO-stringy, perl-Template-Toolkit
 
 
 Da Perl-CGI-Ajax nicht als Paket für Distributionen bereit steht, muß