X-Git-Url: http://git.bytex64.net/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fperl%2FBlerg-Database%2Flib%2FBlerg%2FDatabase.pm;h=8d3789ab811f89a0de5dce24393394f8bef24a7c;hb=d67dd1bf5a247e20141b9907f5a452da73624235;hp=e462860680b15ca0b7ee528e9c5c505f54200625;hpb=4ebc59f7d9fbd644f2a6a4c5abda2cdd9dcb8476;p=blerg.git diff --git a/lib/perl/Blerg-Database/lib/Blerg/Database.pm b/lib/perl/Blerg-Database/lib/Blerg/Database.pm index e462860..8d3789a 100644 --- a/lib/perl/Blerg-Database/lib/Blerg/Database.pm +++ b/lib/perl/Blerg-Database/lib/Blerg/Database.pm @@ -123,7 +123,7 @@ sub get_subscription_mark { sub subscription_list { my ($obj) = @_; $obj->_ensure_pointer; - return Blerg::Database::_subscription_list($obj->{name}, 0, 1); + return Blerg::Database::_subscription_list($obj->{name}, 0, -1); } sub mute {