package testAutoDB1;
use strict;
use Class::AutoClass;
use Class::AutoDB;

use vars qw(@ISA @AUTO_ATTRIBUTES %AUTODB);
@ISA = qw(Class::AutoClass);

@AUTO_ATTRIBUTES=qw(skey1 lkey1 nonkey);

%AUTODB=
  (-collection=>'Collection1',
   -keys=>q(skey1 string, skey2 integer, skey3 float, skey4 object,
	    lkey1 list(string), lkey2 list(integer), lkey3 list(float), lkey4 list(object)),
  );
Class::AutoClass::declare(__PACKAGE__);

1;

package testAutoDB2;
use strict;
use Class::AutoClass;
use Class::AutoDB;

use vars qw(@ISA @AUTO_ATTRIBUTES %AUTODB);
@ISA = qw(Class::AutoClass);

@AUTO_ATTRIBUTES=qw(skey1 lkey1 nonkey);

%AUTODB=
  (-collection=>'Collection2',
   -keys=>q(skey1 string, skey2 integer, skey3 float, skey4 object,
	    lkey1 list(string), lkey2 list(integer), lkey3 list(float), lkey4 list(object)),
  );
Class::AutoClass::declare(__PACKAGE__);

1;

