almost done fixing addRevision tests

This commit is contained in:
Doug Bell 2010-11-19 19:26:39 -06:00
parent 6931fd471e
commit 7c14d1e6c4
122 changed files with 389 additions and 1052 deletions

View file

@ -273,6 +273,26 @@ sub interceptLogging (&) {
#----------------------------------------------------------------------------
=head2 asset ( props )
Create a safe asset to use for testing. Add all your assets to this asset and
your assets will be automatically cleaned up after the test.
props is a set of name/value pairs for properties for the new asset. defaults
to adding a layout
=cut
sub asset {
my ( $class, %props ) = @_;
$props{className} ||= "WebGUI::Asset::Wobject::Layout";
my $asset = WebGUI::Asset->getImportNode( $class->session )->addChild( \%props );
addToCleanup( $asset );
return $asset;
}
#----------------------------------------------------------------------------
=head2 config
Returns the config object from the session.