X-Git-Url: http://git.bytex64.net/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fperl%2FBlerg-Database%2FDatabase.xs;h=e3614dbb5953309317e5c6246531fcd25299adf7;hb=4dbf6205d0ab778edaa0c43e2eca2b3f92bd2dcb;hp=a3f87a52d6580cc270ad87ebdd6467e52044f938;hpb=4a1ef10deb4ba66c2008a21865b9ed07a7e88def;p=blerg.git

diff --git a/lib/perl/Blerg-Database/Database.xs b/lib/perl/Blerg-Database/Database.xs
index a3f87a5..e3614db 100644
--- a/lib/perl/Blerg-Database/Database.xs
+++ b/lib/perl/Blerg-Database/Database.xs
@@ -32,6 +32,12 @@ MODULE = Blerg::Database		PACKAGE = Blerg::Database
 INCLUDE: const-xs.inc
 PROTOTYPES: ENABLE
 
+int init()
+    CODE:
+        RETVAL = blerg_init();
+    OUTPUT:
+        RETVAL
+
 int exists(const char *name)
     CODE:
         RETVAL = blerg_exists(name);
@@ -111,15 +117,15 @@ const char * _get_subscription_mark(struct blerg *ptr)
         n = snprintf(buf, 21, "%llu", mark);
         XPUSHs(sv_2mortal(newSVpv(buf, n)));
 
-int _set_mute(struct blerg *ptr, int v)
+int _set_status(struct blerg *ptr, int status, int v)
     CODE:
-        RETVAL = blerg_set_mute(ptr, v);
+        RETVAL = blerg_set_status(ptr, status, v);
     OUTPUT:
         RETVAL
 
-int _get_mute(struct blerg *ptr)
+int _get_status(struct blerg *ptr, int status)
     CODE:
-        RETVAL = blerg_get_mute(ptr);
+        RETVAL = blerg_get_status(ptr, status);
     OUTPUT:
         RETVAL
 
@@ -131,6 +137,7 @@ void tag_list(const char *tag, const char *str_offset, int direction)
         int count, i;
     PPCODE:
         offset = strtoull(str_offset, NULL, 0);
+        count = 50;
         list = tag_list(tag, offset, &count, direction);
         if (list == NULL) {
             XSRETURN_EMPTY;
@@ -156,6 +163,7 @@ void _subscription_list(const char *author, const char *str_offset, int directio
         int count, i;
     PPCODE:
         offset = strtoull(str_offset, NULL, 0);
+        count = 50;
         list = subscription_list(author, offset, &count, direction);
         if (list == NULL) {
             XSRETURN_EMPTY;