Remove use_ok, SKIP, plan, END block.
This commit is contained in:
parent
2ad02b32e1
commit
cd97f2e0ab
1 changed files with 6 additions and 18 deletions
|
|
@ -63,31 +63,21 @@ $canPostMaker->prepare({
|
||||||
fail => [1, $reader ],
|
fail => [1, $reader ],
|
||||||
});
|
});
|
||||||
|
|
||||||
my $tests = 50
|
|
||||||
+ $canPostMaker->plan
|
|
||||||
;
|
|
||||||
plan tests => 1
|
|
||||||
+ $tests;
|
|
||||||
|
|
||||||
#----------------------------------------------------------------------------
|
#----------------------------------------------------------------------------
|
||||||
# put your tests here
|
# put your tests here
|
||||||
|
|
||||||
my $class = 'WebGUI::Asset::Wobject::StoryArchive';
|
use_ok('WebGUI::Asset::Wobject::StoryArchive');
|
||||||
my $loaded = use_ok($class);
|
|
||||||
|
|
||||||
my $storage;
|
my $storage;
|
||||||
my $versionTag;
|
my $versionTag;
|
||||||
|
|
||||||
my $creationDateSth = $session->db->prepare('update asset set creationDate=? where assetId=?');
|
my $creationDateSth = $session->db->prepare('update asset set creationDate=? where assetId=?');
|
||||||
my @skipAutoCommit = (undef, undef, { skipAutoCommitWorkflows => 1 });
|
my @skipAutoCommit = WebGUI::Test->addAssetSkipCoda;
|
||||||
|
|
||||||
SKIP: {
|
|
||||||
|
|
||||||
skip "Unable to load module $class", $tests unless $loaded;
|
|
||||||
my $home = WebGUI::Asset->getDefault($session);
|
my $home = WebGUI::Asset->getDefault($session);
|
||||||
|
|
||||||
$archive = $home->addChild({
|
$archive = $home->addChild({
|
||||||
className => $class,
|
className => 'WebGUI::Asset::Wobject::StoryArchive',
|
||||||
title => 'My Stories',
|
title => 'My Stories',
|
||||||
url => '/home/mystories',
|
url => '/home/mystories',
|
||||||
styleTemplateId => $home->get('styleTemplateId'),
|
styleTemplateId => $home->get('styleTemplateId'),
|
||||||
|
|
@ -661,13 +651,11 @@ $archive->update({ url => '/home/mystories.arch' });
|
||||||
is($archive->getKeywordStaticURL('bar'), '/home/mystories/keyword_bar.html', '... correct URL with file extension');
|
is($archive->getKeywordStaticURL('bar'), '/home/mystories/keyword_bar.html', '... correct URL with file extension');
|
||||||
|
|
||||||
$archive->update({ url => '/home/mystories' });
|
$archive->update({ url => '/home/mystories' });
|
||||||
}
|
|
||||||
|
$creationDateSth->finish;
|
||||||
|
done_testing();
|
||||||
|
|
||||||
#----------------------------------------------------------------------------
|
#----------------------------------------------------------------------------
|
||||||
# Cleanup
|
|
||||||
END {
|
|
||||||
$creationDateSth->finish;
|
|
||||||
}
|
|
||||||
|
|
||||||
sub simpleHrefParser {
|
sub simpleHrefParser {
|
||||||
my ($text) = @_;
|
my ($text) = @_;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue