Index: openacs-4/packages/acs-api-browser/www/tcl-proc-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/tcl-proc-view.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-api-browser/www/tcl-proc-view.tcl	6 Sep 2002 21:49:54 -0000	1.3
+++ openacs-4/packages/acs-api-browser/www/tcl-proc-view.tcl	18 Sep 2002 11:55:43 -0000	1.4
@@ -21,12 +21,9 @@
     set search_for [string range $tcl_proc 0 $i]
     if { [regexp "<a href=(\[^>\]+#\[^>\]+)>$search_for</a>" $tcl_api_index_page match relative_url] } {
         ad_returnredirect "$tcl_api_root$relative_url"
-        return
+        ad_script_abort
     } 
 }
 
 set title "Tcl API Procedure Search for: \"$tcl_proc\""
 set context [list "TCL API Search: $tcl_proc"]
-
-ad_return_template
-