--- trunk/t/5_Node.t	2006/01/06 00:04:28	43
+++ trunk/t/5_Node.t	2006/01/06 01:12:10	44
@@ -3,7 +3,7 @@
 use strict;
 use blib;
 
-use Test::More tests => 40;
+use Test::More tests => 45;
 use Test::Exception;
 use Data::Dumper;
 
@@ -69,5 +69,7 @@
 
 for ( 6 .. 10 ) {
 	ok( $node->get_doc( $_ ), "get_doc $_");
-	ok( $node->get_doc_by_uri( 'test' . $_ ), "get_doc_by_uri test$_");
+	my $uri = 'test' . $_;
+	ok( $node->get_doc_by_uri( $uri ), "get_doc_by_uri $uri");
+	ok( my $k = $node->etch_doc_by_uri( $uri ), "etch_doc_by_uri $uri");
 }