Remove notification package code from SMS install script.
This commit is contained in:
parent
18094751f3
commit
987269f3c3
1 changed files with 0 additions and 51 deletions
|
|
@ -103,7 +103,6 @@ sub finish {
|
||||||
# my $versionTag = WebGUI::VersionTag->getWorking($session);
|
# my $versionTag = WebGUI::VersionTag->getWorking($session);
|
||||||
# $versionTag->commit;
|
# $versionTag->commit;
|
||||||
##
|
##
|
||||||
updateTemplates($session);
|
|
||||||
my $versionTag = WebGUI::VersionTag->getWorking($session);
|
my $versionTag = WebGUI::VersionTag->getWorking($session);
|
||||||
$versionTag->commit;
|
$versionTag->commit;
|
||||||
|
|
||||||
|
|
@ -111,56 +110,6 @@ sub finish {
|
||||||
$session->close;
|
$session->close;
|
||||||
}
|
}
|
||||||
|
|
||||||
#-------------------------------------------------
|
|
||||||
sub updateTemplates {
|
|
||||||
my $session = shift;
|
|
||||||
my $packageDir = "message_center_packages";
|
|
||||||
return undef unless (-d $packageDir);
|
|
||||||
print "\tUpdating packages.\n";
|
|
||||||
opendir(DIR,$packageDir);
|
|
||||||
my @files = readdir(DIR);
|
|
||||||
closedir(DIR);
|
|
||||||
my $newFolder = undef;
|
|
||||||
foreach my $file (@files) {
|
|
||||||
next unless ($file =~ /\.wgpkg$/);
|
|
||||||
# Fix the filename to include a path
|
|
||||||
$file = $packageDir . "/" . $file;
|
|
||||||
addPackage( $session, $file );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
sub addPackage {
|
|
||||||
my $session = shift;
|
|
||||||
my $file = shift;
|
|
||||||
|
|
||||||
# Make a storage location for the package
|
|
||||||
my $storage = WebGUI::Storage->createTemp( $session );
|
|
||||||
$storage->addFileFromFilesystem( $file );
|
|
||||||
|
|
||||||
# Import the package into the import node
|
|
||||||
my $package = WebGUI::Asset->getImportNode($session)->importPackage( $storage );
|
|
||||||
|
|
||||||
# Make the package not a package anymore
|
|
||||||
$package->update({ isPackage => 0 });
|
|
||||||
|
|
||||||
# Set the default flag for templates added
|
|
||||||
my $assetIds
|
|
||||||
= $package->getLineage( ['self','descendants'], {
|
|
||||||
includeOnlyClasses => [ 'WebGUI::Asset::Template' ],
|
|
||||||
} );
|
|
||||||
for my $assetId ( @{ $assetIds } ) {
|
|
||||||
my $asset = WebGUI::Asset->newByDynamicClass( $session, $assetId );
|
|
||||||
if ( !$asset ) {
|
|
||||||
print "Couldn't instantiate asset with ID '$assetId'. Please check package '$file' for corruption.\n";
|
|
||||||
next;
|
|
||||||
}
|
|
||||||
$asset->update( { isDefault => 1 } );
|
|
||||||
}
|
|
||||||
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
__END__
|
__END__
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue