cvsuser 05/02/21 13:48:45
Modified: lib/Apache Qpsmtpd.pm
Log:
APR::Bucket API changed...
From: peter[at]boku.net (Peter Eisch)
Message-ID: <BE3F8D10.1C451%peter[at]boku.net>
Subject: Apache::Qpsmptd.pm patch
Date: Mon, 21 Feb 2005 13:05:20 -0600
Revision Changes Path
1.2 +3 -3 qpsmtpd/lib/Apache/Qpsmtpd.pm
Index: Qpsmtpd.pm
===================================================================
RCS file: /cvs/public/qpsmtpd/lib/Apache/Qpsmtpd.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- Qpsmtpd.pm 12 Oct 2004 07:39:04 -0000 1.1
+++ Qpsmtpd.pm 21 Feb 2005 21:48:45 -0000 1.2
@@ -1,4 +1,4 @@
-# $Id: Qpsmtpd.pm,v 1.1 2004/10/12 07:39:04 msergeant Exp $
+# $Id: Qpsmtpd.pm,v 1.2 2005/02/21 21:48:45 ask Exp $
package Apache::Qpsmtpd;
@@ -18,7 +18,7 @@
use ModPerl::Util ();
# use Apache::TieBucketBrigade;
-our $VERSION = '0.01';
+our $VERSION = '0.02';
sub handler {
my Apache::Connection $c = shift;
@@ -144,7 +144,7 @@
my $bb = $self->{bb_out};
my $line = $code . (@messages?"-":" ").$msg;
$self->log(LOGDEBUG, $line);
- my $bucket = APR::Bucket->new("$line\r\n");
+ my $bucket = APR::Bucket->new(($c->bucket_alloc), "$line\r\n");
$bb->insert_tail($bucket);
$c->output_filters->fflush($bb);
$bucket->remove;