Index: trunk/Nebulous-Server/t/08_server_delete_instance.t
===================================================================
--- trunk/Nebulous-Server/t/08_server_delete_instance.t	(revision 12643)
+++ trunk/Nebulous-Server/t/08_server_delete_instance.t	(revision 12644)
@@ -3,5 +3,5 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 08_server_delete_instance.t,v 1.6 2006-12-08 03:29:19 jhoblitt Exp $
+# $Id: 08_server_delete_instance.t,v 1.7 2007-03-28 21:50:26 jhoblitt Exp $
 
 use strict;
@@ -25,7 +25,7 @@
 
 {
-    my $uri = $neb->create_object( "foo" );
+    my $uri = $neb->create_object("foo");
 
-    ok( $neb->delete_instance( $uri ), "delete instance" );
+    ok($neb->delete_instance($uri), "delete instance");
 }
 
@@ -33,19 +33,19 @@
 
 {
-    my $uri1 = $neb->create_object( "foo" );
-    my $uri2 = $neb->replicate_object( "foo" );
+    my $uri1 = $neb->create_object("foo");
+    my $uri2 = $neb->replicate_object("foo");
 
-    ok( $neb->delete_instance( $uri1 ), "delete instance" );
+    ok($neb->delete_instance($uri1), "delete instance");
 
-    my $locations = $neb->find_instances( "foo" );
+    my $locations = $neb->find_instances("foo");
 
-    is( $locations->[0], $uri2, "instance remains" );
+    is($locations->[0], $uri2, "instance remains");
 
-    ok( $neb->delete_instance( $uri2 ), "delete instance" );
+    ok($neb->delete_instance( $uri2 ), "delete instance");
 
     eval {
-        $neb->find_instances( "foo" );
+        $neb->find_instances("foo");
     };
-    like( $@, qr/no instances found/, "storage object was deleted" );
+    like($@, qr/no instances found/, "storage object was deleted");
 }
 
@@ -53,7 +53,7 @@
 
 eval {
-    $neb->delete_instance( "file:/foo" );
+    $neb->delete_instance("file:/foo");
 };
-like( $@, qr/no instance is associated with uri/, "uri does not exist" );
+like($@, qr/no instance is associated with uri/, "uri does not exist");
 
 Test::Nebulous->setup;
@@ -62,12 +62,12 @@
     $neb->delete_instance();
 };
-like( $@, qr/1 was expected/, "no params" );
+like($@, qr/1 was expected/, "no params");
 
 Test::Nebulous->setup;
 
 eval {
-    $neb->delete_instance( "foo", 2 );
+    $neb->delete_instance("foo", 2);
 };
-like( $@, qr/1 was expected/, "too many params" );
+like($@, qr/1 was expected/, "too many params");
 
 Test::Nebulous->cleanup;
Index: trunk/Nebulous-Server/t/09_server_is_valid_class_id.t
===================================================================
--- trunk/Nebulous-Server/t/09_server_is_valid_class_id.t	(revision 12643)
+++ trunk/Nebulous-Server/t/09_server_is_valid_class_id.t	(revision 12644)
@@ -3,5 +3,5 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 09_server_is_valid_class_id.t,v 1.2 2006-12-08 03:29:19 jhoblitt Exp $
+# $Id: 09_server_is_valid_class_id.t,v 1.3 2007-03-28 21:53:20 jhoblitt Exp $
 
 use strict;
@@ -25,14 +25,14 @@
 
 # 0 is the default and is guarenteed to exist
-ok( $neb->_is_valid_class_id( 0 ), "default class id");
+ok($neb->_is_valid_class_id(0), "default class id");
 
 Test::Nebulous->setup;
 
 # the test setup adds class id 1
-ok( $neb->_is_valid_class_id( 1 ), "custom class id");
+ok($neb->_is_valid_class_id(1), "custom class id");
 
 Test::Nebulous->setup;
 
-is( $neb->_is_valid_class_id( 99 ), undef, "invalid class id");
+is($neb->_is_valid_class_id(99), undef, "invalid class id");
 
 Test::Nebulous->cleanup;