Fix test. Inheritance wasn't working with the package defined inside
the test.
This commit is contained in:
parent
a84d352f21
commit
2daed0d1cc
2 changed files with 22 additions and 19 deletions
21
t/lib/WebGUI/SubClass.pm
Normal file
21
t/lib/WebGUI/SubClass.pm
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
package WebGUI::Crud::Subclass;
|
||||
|
||||
use strict;
|
||||
|
||||
use base 'WebGUI::Crud';
|
||||
|
||||
sub crud_definition {
|
||||
my ($class, $session) = @_;
|
||||
my $definition = $class->SUPER::crud_definition($session);
|
||||
$definition->{tableName} = 'crudSubclass';
|
||||
$definition->{tableKey} = 'crudSubclassId';
|
||||
$definition->{sequenceKey} = '';
|
||||
my $properties = $definition->{properties};
|
||||
$properties->{field1} = {
|
||||
fieldType => 'integer',
|
||||
defaultValue => 5,
|
||||
};
|
||||
return $definition;
|
||||
}
|
||||
|
||||
1;
|
||||
Loading…
Add table
Add a link
Reference in a new issue