<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">package Plack::TempBuffer;
use strict;
use warnings;

use parent 'Stream::Buffered';

sub new {
    my $class = shift;

    if (defined $Plack::TempBuffer::MaxMemoryBufferSize) {
        warn "Setting \$Plack::TempBuffer::MaxMemoryBufferSize is deprecated. "
           . "You should set \$Stream::Buffered::MaxMemoryBufferSize instead.";
        $Stream::Buffered::MaxMemoryBufferSize = $Plack::TempBuffer::MaxMemoryBufferSize;
    }

    return $class-&gt;SUPER::new(@_);
}

1;
</pre></body></html>