Index: openacs-4/packages/ecommerce/www/admin/products/upload-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/products/upload-2.tcl,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/ecommerce/www/admin/products/upload-2.tcl 8 Mar 2004 19:46:14 -0000 1.5 +++ openacs-4/packages/ecommerce/www/admin/products/upload-2.tcl 9 Mar 2004 00:39:10 -0000 1.6 @@ -135,14 +135,16 @@ } # be certain that present_p defaults to 't' if no value given + # if it's not false it must be true if {[string equal $present_p "f"] != 1} { set present_p "t" } # be certain that no_shipping_avail_p defaults to 'f' if no value given + # if it's not true it must be false - if {[string equal no_shipping_avail_p "f"] != 1} { + if {[string equal no_shipping_avail_p "t"] != 1} { set no_shipping_avail_p "f" }