Index: openacs-4/packages/acs-api-browser/acs-api-browser.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/acs-api-browser.info,v
diff -u -r1.40.2.7 -r1.40.2.8
--- openacs-4/packages/acs-api-browser/acs-api-browser.info	13 Jul 2023 13:09:51 -0000	1.40.2.7
+++ openacs-4/packages/acs-api-browser/acs-api-browser.info	25 Aug 2024 17:39:53 -0000	1.40.2.8
@@ -7,7 +7,7 @@
     <initial-install-p>t</initial-install-p>
     <singleton-p>t</singleton-p>
     
-    <version name="5.10.1b1" url="http://openacs.org/repository/download/apm/acs-api-browser-5.10.1b1.apm">
+    <version name="5.10.1b2" url="http://openacs.org/repository/download/apm/acs-api-browser-5.10.1b2.apm">
         <owner url="http://openacs.org">OpenACS</owner>
         <summary>Interactive documentation for the Tcl and SQL APIs.</summary>
         <release-date>2021-10-29</release-date>
@@ -17,9 +17,10 @@
 	<maturity>3</maturity>
         <description format="text/html">On line interactive documentation for the locally installed Tcl and SQL APIs.  Links to the Tcl core and NaviServer/AOLServer online documentation as well.</description>
 
-        <provides url="acs-api-browser" version="5.10.1b1"/>
+        <provides url="acs-api-browser" version="5.10.1b2"/>
 	<requires url="acs-tcl" version="5.10.1b1"/>
         <requires url="acs-kernel" version="5.10.1b1"/>
+        <requires url="acs-automated-testing" version="5.10.1b3"/>
 
         <callbacks>
         </callbacks>
Index: openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl,v
diff -u -r1.4.2.41 -r1.4.2.42
--- openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl	19 Aug 2024 13:55:14 -0000	1.4.2.41
+++ openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl	25 Aug 2024 17:39:53 -0000	1.4.2.42
@@ -36,11 +36,17 @@
         set property [ad_generate_random_string]
         set value [ad_generate_random_string]
         set value2 ${value}2
-        api_add_to_proc_doc \
-            -proc_name $proc_name \
-            -property $property \
-            -value $value
 
+        #
+        # Silence Warning: api_add_to_proc_doc: no proc_doc available for
+        #
+        aa_silence_log_entries -severities {warning} {
+            api_add_to_proc_doc \
+                -proc_name $proc_name \
+                -property $property \
+                -value $value
+        }
+
         aa_true "nsv was created" [nsv_exists api_proc_doc $proc_name]
 
         aa_true "nsv contains the property" [dict exists [nsv_get api_proc_doc $proc_name] $property]
@@ -637,22 +643,24 @@
         # Get the form data
         #
         set form_data [::acs::test::get_form [dict get $d body] {//form[@id="api-search"]}]
+
         #
         # Fill in with the proc to search
         #
         set proc_to_search "ad_proc"
         set param_weight 3
-        #ns_log notice "HHHHHHHHHHHHH form_data $form_data"
+
         set d [::acs::test::form_reply \
-                    -last_request $d \
-                    -url [dict get $form_data @action] \
-                    -update [subst {
-                        query_string "$proc_to_search"
-                        param_weight $param_weight
-                    }] \
-                    [dict get $form_data fields]]
+                   -last_request $d \
+                   -url [dict get $form_data @action] \
+                   -update [subst {
+                       query_string "$proc_to_search"
+                       param_weight $param_weight
+                   }] \
+                   [dict get $form_data fields]]
+
         set reply [dict get $d body]
-        #ns_log notice "HHHHHHHHHHHHH d $d"
+
         #
         # Check, if the form was correctly validated.
         #
@@ -662,7 +670,13 @@
         # Check the proc-search page directly
         #
         set page "/api-doc/proc-search?query_string=$proc_to_search&param_weight=$param_weight"
-        set d [acs::test::http -user_info $user_info $page]
+
+        #
+        # Silence Warning: CSRF failure
+        #
+        aa_silence_log_entries -severities warning {
+            set d [acs::test::http -user_info $user_info $page]
+        }
         acs::test::reply_has_status_code $d 200
     }
 }