Index: openacs-4/packages/contacts/www/index.vuh =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/index.vuh,v diff -u -r1.2 -r1.3 --- openacs-4/packages/contacts/www/index.vuh 27 May 2005 00:18:58 -0000 1.2 +++ openacs-4/packages/contacts/www/index.vuh 13 Jun 2005 07:22:36 -0000 1.3 @@ -62,7 +62,24 @@ ad_script_abort } } else { - ns_returnnotfound - ad_script_abort + switch $file_url { + "add/person" { + if { [ns_queryget object_type] != "" } { + rp_form_put object_type "person" + } + rp_internal_redirect contact-add + } + "add/organization" { + if { [ns_queryget object_type] != "" } { + rp_form_put object_type "organization" + } + rp_internal_redirect contact-add + } + default { + ns_returnnotfound + ad_script_abort + } + } + }