Index: trunk/Nebulous/t/63_client_stat.t
===================================================================
--- trunk/Nebulous/t/63_client_stat.t	(revision 5667)
+++ trunk/Nebulous/t/63_client_stat.t	(revision 13092)
@@ -3,5 +3,5 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 63_client_stat.t,v 1.1 2005-12-03 02:52:31 jhoblitt Exp $
+# $Id: 63_client_stat.t,v 1.2 2007-05-01 02:52:04 jhoblitt Exp $
 
 use strict;
@@ -10,5 +10,5 @@
 use Apache::Test qw( -withtestmore );
 
-plan tests => 13;
+plan tests => 11;
 
 use lib qw( ./t ./lib );
@@ -30,5 +30,5 @@
     my $info = $neb->stat( "foo" );
 
-    is( scalar @$info, 8, "number of columns" );
+    is( scalar @$info, 6, "number of columns" );
 }
 
@@ -39,17 +39,15 @@
         proxy => "http://$hostport/nebulous",
     );
-    $neb->create( "foo", 0, "node01", "foobar" );
+    $neb->create( "foo", "node01" );
 
     my $info = $neb->stat( "foo" );
 
-    is( scalar @$info, 8,                       "number of columns" );
+    is( scalar @$info, 6,                       "number of columns" );
     is( @$info[0], 1,                           "so_id" );
     is( @$info[1], "foo",                       "ext_id" );
-    is( @$info[2], 0,                           "class_id" );
-    is( @$info[3], "foobar",                    "comment" );
-    is( @$info[4], 0,                           "read lock" );
-    is( @$info[5], undef,                       "write lock" );
-    like( @$info[6], qr/....-..-.. ..:..:../,   "epoch" );
-    like( @$info[6], qr/....-..-.. ..:..:../,   "mtime" );
+    is( @$info[2], 0,                           "read lock" );
+    is( @$info[3], undef,                       "write lock" );
+    like( @$info[4], qr/....-..-.. ..:..:../,   "epoch" );
+    like( @$info[5], qr/....-..-.. ..:..:../,   "mtime" );
 }