Index: openacs-4/packages/acs-api-browser/www/proc/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/proc/index.vuh,v
diff -u -r1.1 -r1.1.2.1
--- openacs-4/packages/acs-api-browser/www/proc/index.vuh	20 Aug 2002 12:41:27 -0000	1.1
+++ openacs-4/packages/acs-api-browser/www/proc/index.vuh	28 Oct 2002 12:30:47 -0000	1.1.2.1
@@ -1,3 +1,3 @@
-rp_form_put query_string [string range [ad_conn extra_url] [string length "proc/"] end]
-rp_form_put search_type "Feeling Lucky"
-rp_internal_redirect "/packages/[ad_conn package_key]/www/proc-search"
+set query_string [string range [ad_conn extra_url] [string length "proc/"] end]
+set url "[ad_conn package_url]proc-search?[export_vars { query_string { search_type "Feeling Lucky" } }]"
+ad_returnredirect $url