Forward port gallery images folder style template fix, and also

fix the Map templates folder.
This commit is contained in:
Colin Kuskie 2009-08-04 16:26:05 +00:00
parent 2892aedf71
commit f60a4b9ecc
2 changed files with 34 additions and 0 deletions

View file

@ -32,6 +32,8 @@ my $session = start(); # this line required
# upgrade functions go here
addFriendManagerSettings($session);
fixGalleyImageFolderStyle($session);
fixMapTemplateFolderStyle($session);
finish($session); # this line required
@ -53,6 +55,37 @@ sub addFriendManagerSettings {
print "DONE!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub fixMapTemplateFolderStyle {
my $session = shift;
print "\tFix the Map Template subfolder style template... " unless $quiet;
my $folder = WebGUI::Asset->new($session, 'brxm_faNdZX5tRo3p50g3g', 'WebGUI::Asset::Wobject::Folder');
return unless $folder;
if ($folder) {
$folder->addRevision({
styleTemplateId => 'PBtmpl0000000000000060',
});
}
# and here's our code
print "DONE!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub fixGalleyImageFolderStyle {
my $session = shift;
print "\tFix the gallery image subfolder style template... " unless $quiet;
my $folder = WebGUI::Asset->new($session, 'kaPRSaf8UKiskiGEgJgLAw', 'WebGUI::Asset::Wobject::Folder');
if ($folder) {
$folder->addRevision({
styleTemplateId => 'PBtmpl0000000000000060',
});
}
# and here's our code
print "DONE!\n" unless $quiet;
}
# -------------- DO NOT EDIT BELOW THIS LINE --------------------------------
#----------------------------------------------------------------------------