Change tests to use the automatic backup of Settings in END blocks.
This commit is contained in:
parent
6f3aae261b
commit
4e78593395
23 changed files with 13 additions and 93 deletions
|
|
@ -48,7 +48,8 @@ our $logger_debug;
|
|||
our $logger_info;
|
||||
our $logger_error;
|
||||
|
||||
my %originalConfig = ();
|
||||
my %originalConfig;
|
||||
my $originalSetting;
|
||||
|
||||
BEGIN {
|
||||
|
||||
|
|
@ -128,6 +129,8 @@ BEGIN {
|
|||
$SESSION = WebGUI::Session->open( $WEBGUI_ROOT, $CONFIG_FILE );
|
||||
$SESSION->{_request} = $pseudoRequest;
|
||||
|
||||
$originalSetting = clone $SESSION->setting;
|
||||
|
||||
}
|
||||
|
||||
END {
|
||||
|
|
@ -146,6 +149,10 @@ END {
|
|||
$SESSION->config->delete($key);
|
||||
}
|
||||
}
|
||||
my $settings = $originalSetting->get();
|
||||
while (my ($param, $value) = each %{ $settings }) {
|
||||
$SESSION->setting->set($param, $value);
|
||||
}
|
||||
$SESSION->var->end;
|
||||
$SESSION->close if defined $SESSION;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue