diff --git a/lib/WebGUI/Asset/Wobject/AssetReport.pm b/lib/WebGUI/Asset/Wobject/AssetReport.pm index 4fa6f4c53..96bdf5386 100644 --- a/lib/WebGUI/Asset/Wobject/AssetReport.pm +++ b/lib/WebGUI/Asset/Wobject/AssetReport.pm @@ -18,7 +18,7 @@ use WebGUI::International; use WebGUI::Paginator; use WebGUI::Utility; use Class::C3; -use base qw/WebGUI::AssetAspect::Installable WebGUI::Asset::Wobject/; +use base qw/WebGUI::Asset::Wobject/; #------------------------------------------------------------------- @@ -191,107 +191,4 @@ sub view { return $self->processTemplate( $var, undef, $self->{_template} ); } ## end sub view -#------------------------------------------------------------------- -# Install Methods Below - Do Not Modify - -#------------------------------------------------------------------- -sub install { - my $class = shift; - my $session = shift; - $class->next::method( $session ); - - ### Create a folder asset to store the default template - my $importNode = WebGUI::Asset->getImportNode($session); - my $folder = $importNode->addChild({ - className => "WebGUI::Asset::Wobject::Folder", - title => "Asset Report", - menuTitle => "Asset Report", - url => "pb_asset_report", - groupIdView =>"3" - },"AssetReportFolder00001"); - - ### Add the template to the folder - $folder->addChild({ - className => "WebGUI::Asset::Template", - namespace => "AssetReport", - title => "Asset Report Default Template", - menuTitle => "Asset Report Default Template", - ownerUserId => "3", - groupIdView => "7", - groupIdEdit => "4", - isHidden => 1, - isDefault => 1, - template => qq{ - - - -

-
- - -

-
- - - - - - - -

- - - - - - - - - - - - - - - - - - - -
TitleCreation DateCreated By
^D('%C %D, %y %h:%s %p',);^User('username',);
- - -

-
- }, - headBlock =>"", - }, "AssetReport00000000001"); - - ### Commit version tag - my $tag = WebGUI::VersionTag->new($session, WebGUI::VersionTag->getWorking($session)->getId); - if (defined $tag) { - $tag->set({comments=>"Template added/updated by Asset Install Process"}); - $tag->requestCommit; - } -} - -#------------------------------------------------------------------- -sub uninstall { - my $class = shift; - my $session = shift; - $class->next::method( $session ); - - my $template = WebGUI::Asset->newByDynamicClass($session,"AssetReport00000000001"); - $template->purge if($template); - - my $folder = WebGUI::Asset->newByDynamicClass($session,"AssetReportFolder00001"); - $folder->purge if($folder); -} - 1;