--- t/00-model-User.t	2008/03/13 14:22:53	11
+++ t/00-model-Person.t	2008/06/03 19:29:36	150
@@ -4,51 +4,68 @@
 
 =head1 DESCRIPTION
 
-A basic test harness for the User model.
+A basic test harness for the Person model.
 
 =cut
 
 use Jifty::Test tests => 11;
 
 # Make sure we can load the model
-use_ok('A3C::Model::User');
+use_ok('A3C::Model::Person');
 
 # Grab a system user
 my $system_user = A3C::CurrentUser->superuser;
 ok($system_user, "Found a system user");
 
-# Try testing a create
-my $o = A3C::Model::User->new(current_user => $system_user);
-my ($id) = $o->create(
-	sn => 'Foo',
-	givenName => 'Bar',
-	hrEduPersonUniqueNumber => 42,
-	hrEduPersonAffiliation => 'suradnik',
+my $id;
+
+=for later
+my $organization = A3C::Model::Organization->new(current_user => $system_user);
+($id) = $organization->create(
 	o => 'CARNet',
 	hrEduPersonHomeOrg => 'skole.hr',
 	postalAddress => 'Pere Perica b.b.',
 	l => 'Zagreb',
 );
-ok($id, "User create returned success");
-ok($o->id, "New User has valid id set");
+ok($id, "Organization create returned success");
+=cut
+
+# Try testing a create
+my $o = A3C::Model::Person->new(current_user => $system_user);
+($id) = $o->create(
+	uid => 42,
+	hrEduPersonUniqueID => 42,
+	hrEduPersonExpireDate => '2042-12-30',
+	givenName => 'Foo',
+	sn => 'Bar',
+	cn => 'Foo Bar',
+	hrEduPersonUniqueNumber => 42,
+	hrEduPersonAffiliation => 'suradnik',
+	hrEduPersonHomeOrg => 'skole.hr',
+#	organization => $organization,
+);
+ok($id, "Person create returned success");
+ok($o->id, "New Person has valid id set");
 is($o->id, $id, "Create returned the right id");
 
 # And another
 $o->create(
-	sn => 'Fooby',
+	uid => 1001,
+	hrEduPersonUniqueID => 1001,
+	hrEduPersonExpireDate => '1999-01-01',
 	givenName => 'Bary',
+	sn => 'Fooby',
+	cn => 'Bary Fooby',
 	hrEduPersonUniqueNumber => 1001,
 	hrEduPersonAffiliation => 'gost',
-	o => 'CARNet',
 	hrEduPersonHomeOrg => 'skole.hr',
-	postalAddress => 'Pere Perica b.b.',
-	l => 'Zagreb',
+#	organization => $organization,
 );
-ok($o->id, "User create returned another value");
+ok($o->id, "Person create returned another value");
 isnt($o->id, $id, "And it is different from the previous one");
 
 # Searches in general
-my $collection =  A3C::Model::UserCollection->new(current_user => $system_user);
+my $collection =  A3C::Model::PersonCollection->new(current_user => $system_user);
 $collection->unlimit;
 is($collection->count, 2, "Finds two records");