diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2017-05-15 11:23:48 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2018-05-30 12:32:40 -0700 |
| commit | efdfd4f1dc1ad957c9aa9d4aca0d8d0f2f49806d (patch) | |
| tree | d1dc66081958868ed9f7c8336dedd1622599f4af | |
| parent | d1e3d23e81d41e3a00be708b690ea86812e7b891 (diff) | |
better filename with quotation # for PDF quotation attachments, RT#76003
| -rw-r--r-- | FS/FS/Template_Mixin.pm | 4 | ||||
| -rw-r--r-- | FS/FS/cust_bill.pm | 5 | ||||
| -rw-r--r-- | FS/FS/quotation.pm | 5 |
3 files changed, 12 insertions, 2 deletions
diff --git a/FS/FS/Template_Mixin.pm b/FS/FS/Template_Mixin.pm index 5dc889960..cefb4bcc3 100644 --- a/FS/FS/Template_Mixin.pm +++ b/FS/FS/Template_Mixin.pm @@ -2440,7 +2440,7 @@ sub generate_email { =item mimebuild_pdf Returns a list suitable for passing to MIME::Entity->build(), representing -this invoice as PDF attachment. +this quotation or invoice as PDF attachment. =cut @@ -2451,7 +2451,7 @@ sub mimebuild_pdf { 'Encoding' => 'base64', 'Data' => [ $self->print_pdf(@_) ], 'Disposition' => 'attachment', - 'Filename' => 'invoice-'. $self->invnum. '.pdf', + 'Filename' => $self->pdf_filename, ); } diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index b3e86584b..6bfe3339a 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1166,6 +1166,11 @@ sub email_subject { eval qq("$subject"); } +sub pdf_filename { + my $self = shift; + 'Invoice-'. $self->invnum. '.pdf'; +} + =item lpr_data HASHREF Returns the postscript or plaintext for this invoice as an arrayref. diff --git a/FS/FS/quotation.pm b/FS/FS/quotation.pm index 1a6641f7d..0fd59775b 100644 --- a/FS/FS/quotation.pm +++ b/FS/FS/quotation.pm @@ -237,6 +237,11 @@ sub email_subject { eval qq("$subject"); } +sub pdf_filename { + my $self = shift; + 'Quotation-'. $self->quotationnum. '.pdf'; +} + =item cust_or_prosect =cut |