From 3721e97f7a138d28e9673e159ce0175807df6ee3 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sun, 4 May 2008 23:26:21 +0000
Subject: [PATCH] final accessory changes.  UI tests pass as well

---
 lib/WebGUI/Asset/Sku/Product.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset/Sku/Product.pm b/lib/WebGUI/Asset/Sku/Product.pm
index 998065f60..650418ede 100644
--- a/lib/WebGUI/Asset/Sku/Product.pm
+++ b/lib/WebGUI/Asset/Sku/Product.pm
@@ -134,6 +134,11 @@ sub definition {
             autoGenerate => 0,
             defaultValue => '[]',
         },
+        accessoryJSON => {
+            ##Collateral data is stored as JSON in here
+            autoGenerate => 0,
+            defaultValue => '[]',
+        },
     );
     push(@{$definition}, {
         assetName=>$i18n->get('assetName'),
@@ -564,7 +569,7 @@ sub setAllCollateral {
     my $self       = shift;
     my $tableName  = shift;
     my $json = to_json($self->{_collateral}->{$tableName});
-    $self->update({ $tableName => $json});
+    $self->update({ $tableName => $json });
     return;
 }