Revision: 1999
Author: bsmith
Date: 2006-06-25 05:31:02 -0700 (Sun, 25 Jun 2006)
ViewCVS: http://svn.sourceforge.net/poe/?rev=1999&view=rev
Log Message:
-----------
4 small fixes to POE::Filter::RecordBlock:
* incorrect check in the constructor on the validity of BlockSize
* put() in CheckPut mode used GETBUFFER instead of PUTBUFFER
* documented blocksize()
* documented checkput()
Modified Paths:
--------------
trunk/poe/lib/POE/Filter/RecordBlock.pm
Modified: trunk/poe/lib/POE/Filter/RecordBlock.pm
===================================================================
--- trunk/poe/lib/POE/Filter/RecordBlock.pm 2006-06-24 17:23:11 UTC (rev 1998)
+++ trunk/poe/lib/POE/Filter/RecordBlock.pm 2006-06-25 12:31:02 UTC (rev 1999)
@@ -25,7 +25,7 @@
my %params = @_;
croak "BlockSize must be greater than 0" unless (
- defined($params{BlockSize}) || ($params{BlockSize} < 1)
+ defined($params{BlockSize}) && ($params{BlockSize} > 0)
);
my $self = bless [
@@ -77,7 +77,7 @@
push @{$self->[PUTBUFFER]}, @$_;
}
while (@{$self->[PUTBUFFER]} >= $self->[BLOCKSIZE]) {
- push @result, splice @{$self->[GETBUFFER]}, 0, $self->[BLOCKSIZE];
+ push @result, splice @{$self->[PUTBUFFER]}, 0, $self->[BLOCKSIZE];
}
}
else {
@@ -185,6 +185,20 @@
=item *
+POE::Filter::RecordBlock::blocksize
+
+The blocksize() method takes one optional parameter, the new blocksize.
+It returns the current blocksize.
+
+=item *
+
+POE::Filter::RecordBlock::checkput
+
+The checkput() method takes one optional parameter, the new state of the
+CheckPut flag. It returns the current CheckPut flag.
+
+=item *
+
See POE::Filter.
=back
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|