--- lib/Search/TokyoDystopia.pm	2008/08/18 17:26:01	15
+++ lib/Search/TokyoDystopia.pm	2008/08/18 17:45:56	17
@@ -32,6 +32,7 @@
 tcidbclose
 tcidbput
 tcidbout
+tcidbget
 );
 
 =head1 NAME
@@ -99,7 +100,15 @@
 
 =head2 tcidbput
 
-  my $success = tcidbput( $idb, $id, $utf8_text );
+  my $success = tcidbput( $idb, $id, $text );
+
+=head2 tcidbout
+  
+  my $success = tcidbout( $idb, $id );
+
+=head2 tcidbget
+  
+  my $text = tcidbget( $idb, $id );
 
 =head1 KNOWN BUGS