Removing more END blocks
This commit is contained in:
parent
3b7d582e8d
commit
65aa327420
7 changed files with 1 additions and 44 deletions
6
t/Form.t
6
t/Form.t
|
|
@ -24,12 +24,6 @@ use WebGUI::Test;
|
|||
# Init
|
||||
my $session = WebGUI::Test->session;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Tests
|
||||
|
||||
|
|
|
|||
|
|
@ -120,9 +120,4 @@ like( $html, qr{<table[^>]*id="test-container-table"}, "getTableHtml table has I
|
|||
my $html = $dt->toHtml;
|
||||
ok( $dt->get( "showEdit" ), "showEdit gets set by toHtml" );
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
#vim:ft=perl
|
||||
|
|
|
|||
|
|
@ -28,12 +28,6 @@ use WebGUI::Form::SelectRichEditor;
|
|||
my $session = WebGUI::Test->session;
|
||||
my $root = WebGUI::Asset->getRoot( $session );
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Tests
|
||||
plan tests => 1;
|
||||
|
|
|
|||
|
|
@ -67,9 +67,3 @@ like(
|
|||
ok( $adSpace->get('name') eq 'oldname', 'AdSpace does not get saved.' );
|
||||
|
||||
$adSpace->delete;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
|
|
|
|||
|
|
@ -54,10 +54,3 @@ unlike(
|
|||
qr/<input type="hidden" name="method" value="login" /,
|
||||
"Hidden form elements for login NOT displayed to valid user",
|
||||
);
|
||||
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
|
|
|
|||
|
|
@ -454,10 +454,4 @@ cmp_deeply(
|
|||
);
|
||||
ok( !WebGUI::User->validUserId( $session, $userRed->getId ), "UserId no longer exists" );
|
||||
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END {
|
||||
|
||||
}
|
||||
#vim:ft=perl
|
||||
|
|
|
|||
|
|
@ -136,11 +136,4 @@ is($dumper->Dump, q|$VAR1 = {
|
|||
"find() with return => name",
|
||||
);
|
||||
};
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
|
||||
END {
|
||||
|
||||
}
|
||||
|
||||
#vim:ft=perl
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue