diff --git a/lib/WebGUI/Content/PDFGenerator.pm b/lib/WebGUI/Content/PDFGenerator.pm index c747c9c4f..d0d783831 100644 --- a/lib/WebGUI/Content/PDFGenerator.pm +++ b/lib/WebGUI/Content/PDFGenerator.pm @@ -54,6 +54,12 @@ can also contain additional command line arguments to pass to wkhtmltopdf. #------------------------------------------------------------------- # Return the cached pdf, generating if necessary. +=head2 cache ($asset) + +Returns the cached PDF for an asset, if necessary + +=cut + sub cache { my $asset = shift; my $session = $asset->session; @@ -72,6 +78,12 @@ sub cache { #------------------------------------------------------------------- # Generate the pdf unconditionally and return it as a string. +=head2 generate ($asset) + +Generate the pdf unconditionally and return it as a string. + +=cut + sub generate { my $asset = shift; my $session = $asset->session; @@ -96,7 +108,12 @@ sub generate { } #------------------------------------------------------------------- -# Figure out which asset we need to check permissions for + +=head2 cache ($asset) + +Figure out which asset we need to check permissions for + +=cut sub getRequestedAsset { my $session = shift; @@ -112,6 +129,12 @@ sub getRequestedAsset { #------------------------------------------------------------------- # Top-level handler. +=head2 handler ($session) + +Top-level handler + +=cut + sub handler { my $session = shift; my $op = $session->form->get('op');