Index: openacs-4/packages/ecommerce/www/product-search.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/product-search.tcl,v diff -u -r1.6.4.5 -r1.6.4.6 --- openacs-4/packages/ecommerce/www/product-search.tcl 10 Jun 2005 08:59:49 -0000 1.6.4.5 +++ openacs-4/packages/ecommerce/www/product-search.tcl 3 Jul 2005 05:28:59 -0000 1.6.4.6 @@ -53,7 +53,7 @@ } # filter extra spaces -regsub -all -- {\s+} $search_text { } search_text] +regsub -all -- {\s+} $search_text { } search_text set search_text "[string trim $search_text]" # filter overflow attempts from really long search strings set search_text "[string range $search_text 0 100 ]"