Index: openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl 22 Oct 2001 07:38:06 -0000 1.8
+++ openacs-4/packages/ecommerce/tcl/ecommerce-widgets-procs.tcl 22 Oct 2001 08:02:10 -0000 1.9
@@ -490,13 +490,13 @@
if { $default == "" } {
append widget_value "\n"
}
- set sql "select name, iso from country_names order by name"
+ set sql "select default_name, iso from countries order by default_name"
db_foreach get_countries $sql {
if { $default == $iso } {
- append widget_value "\n"
+ append widget_value "\n"
} else {
- append widget_value "\n"
+ append widget_value "\n"
}
}
append widget_value "\n"