CreatePDF-Helfer: Nicht auf Caller-Package verlassen

Wenn im Controller $self->create_pdf aufgerufen wird, so ist $class dann
das falsche Package, um create_parsed_file aufzurufen, weil diese sub
nicht exportiert wird.

diff --git a/SL/Helper/CreatePDF.pm b/SL/Helper/CreatePDF.pm
index dda4b0d..6308e36 100644 (file)
--- a/SL/Helper/CreatePDF.pm
+++ b/SL/Helper/CreatePDF.pm
@@ -28,7 +28,7 @@ our %EXPORT_TAGS = (
 sub create_pdf {
   my ($class, %params) = @_;
 
-  return $class->create_parsed_file(
+  return __PACKAGE__->create_parsed_file(
     format        => 'pdf',
     template_type => 'LaTeX',
     %params,