Index: openacs-4/contrib/packages/classified-ads/tcl/classified-ads-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/classified-ads/tcl/classified-ads-procs.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/contrib/packages/classified-ads/tcl/classified-ads-procs.tcl	31 Jul 2003 09:31:00 -0000	1.13
+++ openacs-4/contrib/packages/classified-ads/tcl/classified-ads-procs.tcl	21 Aug 2003 02:02:51 -0000	1.14
@@ -115,7 +115,7 @@
 					}
 					"price" {
 						set attribute_name "price"
-						set datatype "integer"
+						set datatype "string"
 						set pretty_name "Price"
 						set pretty_plural "Prices"
 						set default_value 0
@@ -124,7 +124,7 @@
 						set html_options ""
 						set extra_options ""
 						set select_options ""
-						set validate "{ price { [expr \$value < 0] } { \"Price has to be positive.\" }}"
+						set validate "{ price { \[expr \$value < 0\] } { \"Price has to be positive.\" }}"
 						set optional_p "f"
 						set enabled_p "t"
 					}