cvs: CVSROOT / loginfo.pl
| From: | Sascha Schumann | Date: | Fri, 20 Oct 2000 23:57:57 +0000 |
| Subject: | cvs: CVSROOT / loginfo.pl | ||
| Groups: | php.cvs | ||
| Request: | Send a blank email to php-cvs+get-2182@lists.php.net to get a copy of this message | ||
sas Fri Oct 20 16:57:57 2000 EDT
Modified files:
/CVSROOT loginfo.pl
Log:
Give the attachment a sinful name.
Submitted by: Colin Viebrock <colin@easyDNS.com>
Index: CVSROOT/loginfo.pl
diff -u CVSROOT/loginfo.pl:1.35 CVSROOT/loginfo.pl:1.36
--- CVSROOT/loginfo.pl:1.35 Fri Oct 20 16:33:25 2000
+++ CVSROOT/loginfo.pl Fri Oct 20 16:57:56 2000
@@ -13,6 +13,7 @@
use strict;
use Socket;
+use POSIX;
$SIG{PIPE} = 'IGNORE';
@@ -211,6 +212,7 @@
my $boundary = $cvsuser.time();
if (length($diffmsg) > 8000) {
+ my $now = POSIX::strftime("%Y%m%d%H%M%S", localtime);
$email = $common_header.
"MIME-Version: 1.0\n".
"Content-Type: multipart/mixed; boundary=\"$boundary\"\n".
@@ -222,7 +224,7 @@
$common_body.
"--$boundary\n".
"Content-Type: text/plain\n".
- "Content-Disposition: attachment\n".
+ "Content-Disposition: attachment; filename=\"$cvsuser-$now.txt\"\n".
"\n".
"$diffmsg\n".
"--$boundary--\n";