oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Entangle the required and editable properties of Profile fields.

Browse source 
Add tests.  Update i18n for required property hover help.
Upgrade script to set editable=1 on all required fields.
fixes #10781
This commit is contained in:
Colin Kuskie 2009-08-17 19:28:04 +00:00
parent 5baf75bb19
commit 0762ce1730
5 changed files with 53 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

29
t/ProfileField.t
View file

@ -33,7 +33,7 @@ WebGUI::Test->usersToDelete($newUser);
#----------------------------------------------------------------------------
# Tests
plan tests => 37; # Increment this number for each test you create
plan tests => 45; # Increment this number for each test you create
#----------------------------------------------------------------------------
# Test the creation of ProfileField
@ -147,11 +147,38 @@ ok( !WebGUI::ProfileField->isReservedFieldName('shop'), '... shop is not');
ok( WebGUI::ProfileField->exists($session, 'email'), 'exists: email');
ok( !WebGUI::ProfileField->exists($session, 'userId'), '... userId (not)');
###########################################################
#
# set
#
###########################################################
my $newProfileField3 = WebGUI::ProfileField->create($session, 'testField3', {
label => q|WebGUI::International::get('webgui','WebGUI')|,
fieldName => 'Text',
});
is ($newProfileField3->get('editable'), 0, 'default editable = 0');
is ($newProfileField3->get('required'), 0, 'default required = 0');
$newProfileField3->set({ editable => 1});
is ($newProfileField3->get('editable'), 1, 'set editable=1');
is ($newProfileField3->get('required'), 0, '... required=0');
$newProfileField3->set({ editable => 0});
is ($newProfileField3->get('editable'), 0, 'set editable = 0');
is ($newProfileField3->get('required'), 0, '... required = 0');
$newProfileField3->set({ required => 1});
is ($newProfileField3->get('required'), 1, 'set required = 1');
is ($newProfileField3->get('editable'), 1, '... editable = 1');
#----------------------------------------------------------------------------
# Cleanup
END {
$newProfileField->delete;
$newProfileField2->delete;
$newProfileField3->delete;
}