Debug needs an explicit package name for addToCleanup.
This commit is contained in:
parent
19b6f9de12
commit
82bb59d40e
47 changed files with 99 additions and 99 deletions
|
|
@ -29,7 +29,7 @@ my $ldapProps = WebGUI::Test->getSmokeLDAPProps();
|
|||
|
||||
$session->db->setRow("ldapLink","ldapLinkId",$ldapProps, $ldapProps->{ldapLinkId});
|
||||
my $ldapLink = WebGUI::LDAPLink->new( $session, $ldapProps->{ldapLinkId} );
|
||||
addToCleanup($ldapLink);
|
||||
WebGUI::Test->addToCleanup($ldapLink);
|
||||
my $ldap = $ldapLink->bind;
|
||||
$session->setting->set('ldapConnection', $ldapProps->{ldapLinkId} );
|
||||
|
||||
|
|
@ -39,7 +39,7 @@ $ldapGroup->set( "ldapLinkId", $ldapProps->{ldapLinkId} );
|
|||
$ldapGroup->set( "ldapGroup", "cn=Convicts,o=shawshank" );
|
||||
$ldapGroup->set( "ldapGroupProperty", "member" );
|
||||
$ldapGroup->set( "ldapRecursiveProperty", "uid" );
|
||||
addToCleanup($ldapGroup);
|
||||
WebGUI::Test->addToCleanup($ldapGroup);
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Tests
|
||||
|
|
|
|||
|
|
@ -28,7 +28,7 @@ use WebGUI::Auth::WebGUI;
|
|||
my $session = WebGUI::Test->session;
|
||||
|
||||
my $user = WebGUI::User->create( $session );
|
||||
addToCleanup( $user );
|
||||
WebGUI::Test->addToCleanup( $user );
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Test instance
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue