Index: openacs-4/packages/ecommerce/tcl/ecommerce-utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecommerce-utilities-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/ecommerce/tcl/ecommerce-utilities-procs.tcl	22 Oct 2001 08:02:10 -0000	1.4
+++ openacs-4/packages/ecommerce/tcl/ecommerce-utilities-procs.tcl	23 Oct 2001 05:07:14 -0000	1.5
@@ -396,12 +396,12 @@
 } {
     if [catch {
 	db_1row country_name {
-	    select default_name from country_names where iso=:country_code
+	    select default_name from countries where iso=:country_code
 	}
     } errmsg] {
 	return "Country not found"
     }
-    return $name
+    return $default_name
 }
 
 ad_proc ec_pretty_mailing_address_from_args { line1 line2 city usps_abbrev zip_code country_code full_state_name attn phone phone_time } { get Pretty Mailing Address } {