summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-05 00:20:37 +0000
committertetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-05 00:20:37 +0000
commit87594d4b165fe0ff1749f32bf83252968b163336 (patch)
tree2698a974d6ac177f9b2dab9213a3a9e8ba1a9f6f
parentf57853ea3a1517c3c4df234546f86e8b56b0ce04 (diff)
Add code to set read receipt request flag for Mailer
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@485 4979c152-3d1c-0410-bac9-87ea11338e46
-rwxr-xr-xLedgerSMB/Form.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 8f8101ca..a3005ee9 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -619,7 +619,7 @@ sub parse_template {
$self->{tmpfile} = "${LedgerSMB::Sysconfig::userspath}/${fileid}_${tmpfile}";
if ($self->{format} =~ /(postscript|pdf)/ || $self->{media} eq 'email') {
- $out = $self->{OUT};
+ my $out = $self->{OUT};
$self->{OUT} = ">$self->{tmpfile}";
}
@@ -892,6 +892,7 @@ sub parse_template {
$mail->{to} = qq|$self->{email}|;
$mail->{from} = qq|"$myconfig->{name}" <$myconfig->{email}>|;
+ $mail->{notify} = $self->{notify};
$mail->{fileid} = "$fileid.";
# if we send html or plain text inline