byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

APR::Bucket API changed...

Browse Source 
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


git-svn-id: https://svn.perl.org/qpsmtpd/trunk@367 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2005-02-21 21:48:45 +00:00
parent b7cdef5f46
commit d0b9558ce9
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/Apache/Qpsmtpd.pm
View File

@ -18,7 +18,7 @@ use Apache::Filter ();
use ModPerl::Util (); use ModPerl::Util ();
# use Apache::TieBucketBrigade; # use Apache::TieBucketBrigade;
our $VERSION = '0.01'; our $VERSION = '0.02';
sub handler { sub handler {
my Apache::Connection $c = shift; my Apache::Connection $c = shift;
@ -144,7 +144,7 @@ sub respond {
my $bb = $self->{bb_out}; my $bb = $self->{bb_out};
my $line = $code . (@messages?"-":" ").$msg; my $line = $code . (@messages?"-":" ").$msg;
$self->log(LOGDEBUG, $line); $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); $bb->insert_tail($bucket);
$c->output_filters->fflush($bb); $c->output_filters->fflush($bb);
$bucket->remove; $bucket->remove;