Add Wobject tests.

t/run_asset.t

@@ -25,6 +25,11 @@ use Test::Asset::Wobject;
 use Test::Asset::Wobject::Article;
 use Test::Asset::Wobject::Calendar;
 use Test::Asset::Wobject::Carousel;
+use Test::Asset::Wobject::Collaboration;
+use Test::Asset::Wobject::DataForm;
+use Test::Asset::Wobject::DataTable;
+use Test::Asset::Wobject::EventManagementSystem;
 use Test::Asset::Wobject::Folder;
+use Test::Asset::Wobject::GalleryAlbum;
 
 Test::Class->runtests;

t/tests/Test/Asset/Wobject/Article.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::Article;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::Article/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject Article/];
+}
+
+1;

t/tests/Test/Asset/Wobject/Calendar.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::Calendar;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::Calendar/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject Calendar/];
+}
+
+1;

t/tests/Test/Asset/Wobject/Carousel.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::Carousel;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::Carousel/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject Carousel/];
+}
+
+1;

t/tests/Test/Asset/Wobject/Collaboration.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::Collaboration;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::Collaboration/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject Collaboration assetAspectRssFeed/];
+}
+
+1;

t/tests/Test/Asset/Wobject/DataForm.pm

@@ -0,0 +1,33 @@
+package Test::Asset::Wobject::DataForm;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::DataForm/;
+}
+
+sub assetUiLevel {
+     return 5;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject DataForm/];
+}
+
+1;

t/tests/Test/Asset/Wobject/DataTable.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::DataTable;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::DataTable/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject DataTable/];
+}
+
+1;

t/tests/Test/Asset/Wobject/EventManagementSystem.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::EventManagementSystem;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::EventManagementSystem/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject EventManagementSystem/];
+}
+
+1;

t/tests/Test/Asset/Wobject/Folder.pm

@@ -0,0 +1,33 @@
+package Test::Asset::Wobject::Folder;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::Folder/;
+}
+
+sub assetUiLevel {
+     return 5;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject Folder/];
+}
+
+1;

t/tests/Test/Asset/Wobject/GalleryAlbum.pm

@@ -0,0 +1,29 @@
+package Test::Asset::Wobject::GalleryAlbum;
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2009 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use base qw/Test::AssetBase/;
+
+use Test::More;
+use Test::Deep;
+use Test::Exception;
+
+sub class {
+     return qw/WebGUI::Asset::Wobject::GalleryAlbum/;
+}
+
+sub list_of_tables {
+     return [qw/assetData wobject GalleryAlbum assetAspectRssFeed/];
+}
+
+1;