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.42 -r1.43
--- openacs-4/packages/contacts/www/contact-add.tcl	10 Feb 2006 19:59:12 -0000	1.42
+++ openacs-4/packages/contacts/www/contact-add.tcl	16 Feb 2006 15:44:59 -0000	1.43
@@ -42,6 +42,7 @@
 }
 
 set package_id [ad_conn package_id]
+set package_url [ad_conn package_url]
 set user_id [ad_conn user_id]
 set peeraddr [ad_conn peeraddr]
 
@@ -329,7 +330,7 @@
 	    ad_returnredirect [contact::url -party_id $party_id]
 #            ad_returnredirect [export_vars -base "/contacts" -url {{query_id $group_id}}] 
 	} else {
-	    ad_returnredirect "/contacts/$object_id_two"
+	    ad_returnredirect "${package_url}/$object_id_two"
 	}
 	    #        }
 	ad_script_abort