diff --git a/docs/upgrades/packages-7.9.4/style_01.wgpkg b/docs/upgrades/packages-7.9.4/style_01.wgpkg new file mode 100644 index 000000000..89c522b48 Binary files /dev/null and b/docs/upgrades/packages-7.9.4/style_01.wgpkg differ diff --git a/docs/upgrades/packages-7.9.4/style_02.wgpkg b/docs/upgrades/packages-7.9.4/style_02.wgpkg new file mode 100644 index 000000000..f34a2512d Binary files /dev/null and b/docs/upgrades/packages-7.9.4/style_02.wgpkg differ diff --git a/docs/upgrades/packages-7.9.4/style_03.wgpkg b/docs/upgrades/packages-7.9.4/style_03.wgpkg new file mode 100644 index 000000000..f492f30d3 Binary files /dev/null and b/docs/upgrades/packages-7.9.4/style_03.wgpkg differ diff --git a/docs/upgrades/upgrade_7.9.3-7.9.4.pl b/docs/upgrades/upgrade_7.9.3-7.9.4.pl index efa458b6b..4692e1ecd 100644 --- a/docs/upgrades/upgrade_7.9.3-7.9.4.pl +++ b/docs/upgrades/upgrade_7.9.3-7.9.4.pl @@ -39,6 +39,7 @@ dropVisitorAddressBooks($session); alterCartTable($session); alterAddressBookTable($session); addWizardHandler( $session ); +addTemplateExampleImage( $session ); finish($session); # this line required @@ -52,6 +53,19 @@ finish($session); # this line required # print "DONE!\n" unless $quiet; #} +#---------------------------------------------------------------------------- +# Add example images to templates +sub addTemplateExampleImage { + my $session = shift; + print "\tAdding example image field to template... " unless $quiet; + + $session->db->write( q{ + ALTER TABLE template ADD storageIdExample CHAR(22) + } ); + + print "DONE!\n" unless $quiet; +} + #---------------------------------------------------------------------------- sub addWizardHandler { diff --git a/lib/WebGUI/Asset/Template.pm b/lib/WebGUI/Asset/Template.pm index 04082a2ec..a1e87e543 100644 --- a/lib/WebGUI/Asset/Template.pm +++ b/lib/WebGUI/Asset/Template.pm @@ -109,6 +109,9 @@ sub definition { fieldType => 'yesNo', defaultValue => 0, }, + storageIdExample => { + fieldType => 'image', + }, }, }; return $class->SUPER::definition($session,$definition); @@ -190,6 +193,10 @@ sub duplicate { my $newTemplate = $self->SUPER::duplicate; $newTemplate->update({isDefault => 0}); $newTemplate->addAttachments($self->getAttachments); + if ( my $storageId = $self->get('storageIdExample') ) { + my $newStorage = WebGUI::Storage->get( $self->session, $storageId )->copy; + $newTemplate->update({ storageIdExample => $newStorage->getId }); + } return $newTemplate; } @@ -205,6 +212,9 @@ sub exportAssetData { my ( $self ) = @_; my $data = $self->SUPER::exportAssetData; $data->{template_attachments} = $self->getAttachments; + if ( $self->get('storageIdExample') ) { + push @{$data->{storage}}, $self->get('storageIdExample'); + } return $data; } @@ -387,6 +397,13 @@ sub getEditForm { $label = $i18n->get('attachment add field label'); $properties->raw("