Closer to Roles. Remove also from WebGUI::Definition, and put use Moose in all Asset classes.

lib/WebGUI/Asset/Wobject/Article.pm

@@ -15,6 +15,7 @@ use Tie::IxHash;
 use WebGUI::International;
 use WebGUI::Paginator;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_Article'];

lib/WebGUI/Asset/Wobject/Calendar.pm

@@ -13,6 +13,7 @@ use strict;
 #----------------------------------------------------------------------------
 
 #use base qw/WebGUI::Asset::Wobject WebGUI::JSONCollateral/;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/Carousel.pm

@@ -17,6 +17,7 @@ use warnings;
 use JSON;
 use WebGUI::International;
 use WebGUI::Utility;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => [ 'assetName', 'Asset_Carousel' ];

lib/WebGUI/Asset/Wobject/Collaboration/Newsletter.pm

@@ -11,6 +11,7 @@ package WebGUI::Asset::Wobject::Collaboration::Newsletter;
 #-------------------------------------------------------------------
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject::Collaboration';
 define assetName => ['assetName', 'Asset_Newsletter'];

lib/WebGUI/Asset/Wobject/Dashboard.pm

@@ -17,6 +17,7 @@ use WebGUI::ProfileField;
 use Time::HiRes;
 use WebGUI::Asset::Wobject;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => [ 'assetName', 'Asset_Dashboard' ];

lib/WebGUI/Asset/Wobject/DataForm.pm

@@ -25,6 +25,7 @@ use WebGUI::Inbox;
 use WebGUI::SQL;
 use JSON ();
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/DataTable.pm

@@ -13,6 +13,7 @@ $VERSION = "1.0.0";
 #-------------------------------------------------------------------
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName         => ['assetName', 'Asset_EMSRibbon'];

lib/WebGUI/Asset/Wobject/EventManagementSystem.pm

@@ -15,6 +15,7 @@ package WebGUI::Asset::Wobject::EventManagementSystem;
 =cut
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_EventManagementSystem'];

lib/WebGUI/Asset/Wobject/Folder.pm

@@ -15,6 +15,7 @@ package WebGUI::Asset::Wobject::Folder;
 =cut
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/Gallery.pm

@@ -13,6 +13,7 @@ package WebGUI::Asset::Wobject::Gallery;
 use strict;
 #use Class::C3;
 #use base qw(WebGUI::AssetAspect::RssFeed WebGUI::Asset::Wobject);
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName           => ['assetName', 'Asset_Gallery'];

lib/WebGUI/Asset/Wobject/GalleryAlbum.pm

@@ -13,6 +13,7 @@ package WebGUI::Asset::Wobject::GalleryAlbum;
 use strict;
 #use Class::C3;
 #use base qw(WebGUI::AssetAspect::RssFeed WebGUI::Asset::Wobject);
+use Moose;
 use WebGUI::Definition::Asset;
 define assetName           => ['assetName', 'Asset_GalleryAlbum'];
 define icon                => 'photoAlbum.gif';

lib/WebGUI/Asset/Wobject/HttpProxy.pm

@@ -22,6 +22,7 @@ use WebGUI::Asset::Wobject::HttpProxy::Parse;
 use WebGUI::Macro;
 use Apache2::Upload;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_HttpProxy'];

lib/WebGUI/Asset/Wobject/InOutBoard.pm

@@ -7,6 +7,7 @@ use WebGUI::International;
 use WebGUI::Paginator;
 use WebGUI::SQL;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define tableName => 'InOutBoard';

lib/WebGUI/Asset/Wobject/Layout.pm

@@ -16,6 +16,7 @@ package WebGUI::Asset::Wobject::Layout;
 
 use strict;
 use WebGUI::AdSpace;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/Map.pm

@@ -17,6 +17,7 @@ use Tie::IxHash;
 use WebGUI::International;
 use WebGUI::Utility;
 use HTML::Entities qw(encode_entities);
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName         => ['assetName', 'Asset_Map'];

lib/WebGUI/Asset/Wobject/Matrix.pm

@@ -17,6 +17,7 @@ use Tie::IxHash;
 use JSON;
 use WebGUI::International;
 use WebGUI::Utility;
+use Moose;
 use WebGUI::Definition::Asset;
 use feature ":5.10";
 extends 'WebGUI::Asset::Wobject';

lib/WebGUI/Asset/Wobject/MessageBoard.pm

@@ -16,6 +16,7 @@ use WebGUI::Asset::Wobject;
 use WebGUI::International;
 use WebGUI::SQL;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_MessageBoard'];

lib/WebGUI/Asset/Wobject/MultiSearch.pm

@@ -27,6 +27,7 @@ use WebGUI::SQL;
 use WebGUI::Asset::Wobject;
 use WebGUI::Utility;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define tableName => 'MultiSearch';

lib/WebGUI/Asset/Wobject/Navigation.pm

@@ -18,6 +18,7 @@ use WebGUI::SQL;
 use WebGUI::TabForm;
 use WebGUI::Utility;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ["assetName", 'Asset_Navigation'];

lib/WebGUI/Asset/Wobject/Poll.pm

@@ -23,6 +23,7 @@ use WebGUI::Image::Graph;
 use WebGUI::Storage;
 use JSON;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_Poll'];

lib/WebGUI/Asset/Wobject/ProjectManager.pm

@@ -19,6 +19,7 @@ use WebGUI::International;
 use WebGUI::Utility;
 use WebGUI::HTML;
 use POSIX qw(ceil floor);
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_ProjectManager'];

lib/WebGUI/Asset/Wobject/SQLReport.pm

@@ -20,6 +20,7 @@ use WebGUI::Utility;
 use WebGUI::Asset::Wobject;
 use WebGUI::Text qw(:csv);
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_SQLReport'];

lib/WebGUI/Asset/Wobject/Search.pm

@@ -11,6 +11,7 @@ package WebGUI::Asset::Wobject::Search;
 #-------------------------------------------------------------------
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends "WebGUI::Asset::Wobject";
 define assetName => ['assetName', 'Asset_Search'];

lib/WebGUI/Asset/Wobject/Shelf.pm

@@ -14,6 +14,7 @@ use strict;
 use List::MoreUtils;
 use Tie::IxHash;
 use WebGUI::International;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 use WebGUI::Text;

lib/WebGUI/Asset/Wobject/StockData.pm

@@ -16,6 +16,7 @@ use WebGUI::Utility;
 use WebGUI::Asset::Wobject;
 use Finance::Quote;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define tableName => 'StockData';

lib/WebGUI/Asset/Wobject/StoryArchive.pm

@@ -16,6 +16,7 @@ use strict;
 
 #use Class::C3;
 #use base qw/WebGUI::AssetAspect::RssFeed WebGUI::Asset::Wobject/;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_StoryArchive'];

lib/WebGUI/Asset/Wobject/StoryTopic.pm

@@ -13,6 +13,7 @@ $VERSION = "1.0.0";
 #-------------------------------------------------------------------
 
 use strict;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 #use Class::C3;

lib/WebGUI/Asset/Wobject/Survey.pm

@@ -16,6 +16,7 @@ use JSON;
 use WebGUI::International;
 use WebGUI::Form::File;
 use WebGUI::Utility;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName   => ['assetName', 'Asset_Survey'];

lib/WebGUI/Asset/Wobject/SyndicatedContent.pm

@@ -17,6 +17,7 @@ use WebGUI::Exception;
 use WebGUI::HTML;
 use WebGUI::International;
 
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/Thingy.pm

@@ -18,6 +18,7 @@ use WebGUI::Utility;
 use WebGUI::Text;
 use WebGUI::Form::File;
 use WebGUI::DateTime;
+use Moose;
 use WebGUI::Definition::Asset;
 
 extends 'WebGUI::Asset::Wobject';

lib/WebGUI/Asset/Wobject/TimeTracking.pm

@@ -18,6 +18,7 @@ use Tie::IxHash;
 use WebGUI::International;
 use WebGUI::Utility;
 use POSIX qw(ceil floor);
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_TimeTracking'];

lib/WebGUI/Asset/Wobject/UserList.pm

@@ -21,6 +21,7 @@ use WebGUI::International;
 use WebGUI::Pluggable;
 use WebGUI::Form::Image;
 use WebGUI::Form::File;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 

lib/WebGUI/Asset/Wobject/WeatherData.pm

@@ -28,6 +28,7 @@ BEGIN {
 }
 
 use WebGUI::International;
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define tableName => 'WeatherData';

lib/WebGUI/Asset/Wobject/WikiMaster.pm

@@ -16,6 +16,7 @@ package WebGUI::Asset::Wobject::WikiMaster;
 #    WebGUI::AssetAspect::RssFeed 
 #    WebGUI::Asset::Wobject
 #);
+use Moose;
 use WebGUI::Definition::Asset;
 extends 'WebGUI::Asset::Wobject';
 define assetName => ['assetName', 'Asset_RichEdit'];