Hello,

as promised here are our patches.
You need a new tex-template for each document type you send via eMail.
They are named templatename.email.tex
If you don't want anything special you can just copy the regular templates.
If you use PDF as the output format and send via email, it will use the 
new template and rename the attachment pdf file from e.g. invoice.pdf to 
invoice_no.pdf.

Have fun.

Ciao,
Philip
-- 
LINET Services
Bunkus, Geisler und Reetz GbR

Rebenring 33                     Tel.: 0531-280 191 71
38106 Braunschweig               Fax.: 0531-280 191 72

http://www.linet-services.de
mailto:[EMAIL PROTECTED]
--- Form.pm     Fri Jul 12 11:30:23 2002
+++ Form.new.pm Fri Jul 12 11:50:41 2002
@@ -621,7 +621,12 @@
        $mail->{message} .= "<br>\n--<br>\n$myconfig->{signature}";
        
       } else {
-       
+        my $newname = $self->{subject};
+        $newname =~ s/\ /_/g;
+        $newname .= ".pdf";
+        rename($self->{tmpfile}, $newname);
+        $self->{tmpfile} = $newname;
+
        @{ $mail->{attachments} } = ($self->{tmpfile});
 
        $myconfig->{signature} =~ s/\\n/\r\n/g;
--- io.pl       Fri Jul 12 11:27:05 2002
+++ io.new.pl   Fri Jul 12 11:25:49 2002
@@ -685,7 +685,12 @@
     $form->{IN} =~ s/html$/tex/;
   }
   if ($form->{format} eq 'pdf') {
-    $form->{IN} =~ s/html$/tex/;
+    if ($form->{media} eq 'email') {
+      $form->{IN} =~ s/html$/email.tex/;
+    }
+    else {
+      $form->{IN} =~ s/html$/tex/;
+    }
   }
 
   

Reply via email to