Index: openacs-4/packages/contacts/www/contact-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/contact-add.tcl,v
diff -u -r1.28 -r1.29
--- openacs-4/packages/contacts/www/contact-add.tcl	31 Jul 2005 22:35:41 -0000	1.28
+++ openacs-4/packages/contacts/www/contact-add.tcl	24 Aug 2005 10:50:07 -0000	1.29
@@ -23,6 +23,7 @@
 
 
 set group_list [concat [list [list [_ contacts.All_Contacts] $default_group "0"]] [contact::groups]]
+
 if {[empty_string_p $group_ids] && [llength $group_list] > 1} {
     ad_returnredirect "[export_vars -base "../select-groups" -url {object_type}]"
 } elseif { [lsearch $group_ids $default_group] < 0 } {