diff --git a/lib/perl/Blerg-Database/lib/Blerg/Database.pm b/lib/perl/Blerg-Database/lib/Blerg/Database.pm
line changes: +1/-1
index e462860..8d3789a
--- 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 {