--- TokyoDystopia.xs	2008/09/02 16:13:06	32
+++ TokyoDystopia.xs	2008/09/09 11:57:52	33
@@ -396,12 +396,16 @@
 
 
 int
-tcqdbout(qdb, id)
+tcqdbout(qdb, id, text)
 	void *	qdb
 	int	id
-	const char *text;	/* FIXME return old value */
+	SV *	text
+PREINIT:
+	STRLEN	tsize;
+	const char *tbuf;
 CODE:
-	RETVAL = tcqdbout(qdb, id, text);
+	tbuf = SvPV(text, tsize);
+	RETVAL = tcqdbout(qdb, id, tbuf);
 OUTPUT:
 	RETVAL