Skip to content
Permalink
Browse files

Fix a leaking test.

  • Loading branch information...
perlDreamer committed Nov 4, 2011
1 parent 7cfc8e6 commit dc489b25b9f04b6635e01338e0389b434ba92c82
Showing with 7 additions and 1 deletion.
  1. +7 −1 t/Macro/H_homeLink.t
@@ -14,15 +14,21 @@ use WebGUI::Test;
use WebGUI::Session;
use HTML::TokeParser;
use Data::Dumper;
use WebGUI::VersionTag;

use Test::More; # increment this value for each test you create

my $session = WebGUI::Test->session;

my $tag = WebGUI::VersionTag->getWorking($session);
my ($template) = addTemplate();

my $homeAsset = WebGUI::Test->asset;
$tag->commit;

my $originalDefault = $session->setting->get('defaultPage');
WebGUI::Test->addToCleanup(sub { $session->setting->set('defaultPage', $originalDefault); });
$session->setting->set( 'defaultPage', $homeAsset->getId );
WebGUI::Test->addToCleanup($tag);

my $i18n = WebGUI::International->new($session,'Macro_H_homeLink');

0 comments on commit dc489b2

Please sign in to comment.
You can’t perform that action at this time.