Index: openacs-4/packages/ecommerce/www/admin/products/add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/products/add-2.tcl,v
diff -u -r1.5.2.1 -r1.5.2.2
--- openacs-4/packages/ecommerce/www/admin/products/add-2.tcl	20 Feb 2005 09:33:29 -0000	1.5.2.1
+++ openacs-4/packages/ecommerce/www/admin/products/add-2.tcl	20 Feb 2005 11:11:20 -0000	1.5.2.2
@@ -198,11 +198,16 @@
 	    set convert_dimensions "${thumbnail_width}x10000"
         }
     }
+
+    set system_url [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL]
+    set system_name [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemName]
+    set image_comment "from $system_url $system_name"
+
     set perm_thumbnail_filename "$full_dirname/product-thumbnail.jpg"
 
     set convert [ec_convert_path]
     if {![string equal "" $convert] && [file exists $convert]} {
-        if [catch {exec $convert -geometry $convert_dimensions $perm_filename $perm_thumbnail_filename} errmsg ] {
+        if [catch {exec $convert -geometry $convert_dimensions -comment \"$image_comment\" $perm_filename $perm_thumbnail_filename} errmsg ] {
             ad_return_complaint 1 "
                 I am sorry, an error occurred converting the picture.  $errmsg
             "
Index: openacs-4/packages/ecommerce/www/admin/products/edit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/products/edit-2.tcl,v
diff -u -r1.6.2.2 -r1.6.2.3
--- openacs-4/packages/ecommerce/www/admin/products/edit-2.tcl	20 Feb 2005 09:33:29 -0000	1.6.2.2
+++ openacs-4/packages/ecommerce/www/admin/products/edit-2.tcl	20 Feb 2005 11:11:19 -0000	1.6.2.3
@@ -187,11 +187,15 @@
         }
     }
 
+    set system_url [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL]
+    set system_name [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemName]
+    set image_comment "from $system_url $system_name"
+
     set perm_thumbnail_filename "$full_dirname/product-thumbnail.jpg"
 
     set convert [ec_convert_path]
     if {![string equal "" $convert] && [file exists $convert]} {
-        if [catch {exec $convert -geometry $convert_dimensions $perm_filename $perm_thumbnail_filename} errmsg ] {
+        if [catch {exec $convert -geometry $convert_dimensions -comment \"$image_comment\" $perm_filename $perm_thumbnail_filename} errmsg ] {
             ad_return_complaint 1 "
                 I am sorry, an error occurred converting the picture.  $errmsg
             "