Removing END blocks

This commit is contained in:
Colin Kuskie 2010-06-07 18:12:03 -07:00
parent bbe962a185
commit 3b7d582e8d
3 changed files with 3 additions and 16 deletions

View file

@ -31,6 +31,7 @@ my $session = WebGUI::Test->session;
my $lib = WebGUI::Test->lib;
## Remove all macros but International, and set them to call WebGUI::Macro::Callback
WebGUI::Test->originalConfig('macros');
my $originalMacros = $session->config->get('macros');
my $configFileMacros = {};
for my $macro (keys %$originalMacros) {
@ -85,8 +86,3 @@ foreach my $label ( @questionableTemplates ) {
sprintf "Empty template: %s, id: %s, url: %s", @{ $label }{qw/title id url/}
);
}
END {
defined $session &&
$session->config->set('macros', $originalMacros);
}