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.19 -r1.20
--- openacs-4/packages/contacts/www/contact-add.tcl	21 Jun 2005 20:52:21 -0000	1.19
+++ openacs-4/packages/contacts/www/contact-add.tcl	21 Jun 2005 21:26:05 -0000	1.20
@@ -308,8 +308,12 @@
 #        if { [exists_and_not_null formbutton\:save_add_another] } {
 #            ad_returnredirect [export_vars -base "/contacts/$object_type/add" -url]
 #        } else {
+	if {[empty_string_p $object_id_two]} {
             ad_returnredirect [export_vars -base "/contacts" -url {{query_id $group_id}}] 
-#        }
+	} else {
+	    ad_returnredirect "/contacts/$object_id_two"
+	}
+	    #        }
 	ad_script_abort
     }