[1028] in BarnOwl Developers
[D-O-H] r1012 - branches/barnowl_sqlite/owl
daemon@ATHENA.MIT.EDU (nelhage@MIT.EDU)
Thu Oct 29 18:12:16 2009
Resent-From: nelhage@mit.edu
Resent-To: barnowl-dev-mtg@charon.mit.edu
X-Original-To: nelhage@nelhage.com
To: dirty-owl-hackers@mit.edu
From: nelhage@MIT.EDU
Reply-to: dirty-owl-hackers@MIT.EDU
Date: Wed, 2 Apr 2008 13:26:25 -0400 (EDT)
Author: nelhage
Date: 2008-04-02 13:26:25 -0400 (Wed, 02 Apr 2008)
New Revision: 1012
Modified:
branches/barnowl_sqlite/owl/perlwrap.pm
Log:
|| doesn't actually mean defined-or
Modified: branches/barnowl_sqlite/owl/perlwrap.pm
===================================================================
--- branches/barnowl_sqlite/owl/perlwrap.pm 2008-04-02 17:26:24 UTC (rev 1011)
+++ branches/barnowl_sqlite/owl/perlwrap.pm 2008-04-02 17:26:25 UTC (rev 1012)
@@ -494,7 +494,8 @@
sub fill_forward {
my $self = shift;
return if $self->at_end;
- my $pos = shift || ($self->messages->[-1] + 1);
+ my $pos = shift;
+ $pos = ($self->messages->[-1] + 1) unless defined $pos;
BarnOwl::debug("Fill forward from $pos...");
my $ml = BarnOwl::message_list();
$ml->iterate_begin($pos, 0);
