Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v
diff -u -r1.69 -r1.70
--- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	22 Oct 2024 09:03:42 -0000	1.69
+++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	23 Oct 2024 10:41:13 -0000	1.70
@@ -7,7 +7,7 @@
 nsv_array set proc_source_file [list]
 
 if {[info commands ::nx::Class] ne ""} {
-    nx::Class create xo::DocHelper {
+    nx::Class create acs::DocHelper {
         #
         # Helper class to determine the sourcefile, where some "public",
         # "private", or plain "methods" is defined. The mixin is just
@@ -20,14 +20,26 @@
             #ns_log notice "INIT registered epoch [ns_ictl epoch] [self] script [info script]"
         }
         :public method method {args} {
-                                      :register_filename
-                                      return [next]
-                                  }
+            #
+            # Intercept "method" definitions to record the current
+            # filename for the API browser.
+            #
+            :register_filename
+            return [next]
+        }
         :public method public {what name args} {
+            #
+            # Intercept "public method" definitions to record the
+            # current filename for the API browser.
+            #
             :register_filename
             return [next]
         }
-        :public method private {what name args} {
+        :public method protected {what name args} {
+            #
+            # Intercept "protected method" definitions to record the
+            # current filename for the API browser.
+            #
             :register_filename
             return [next]
         }
@@ -51,11 +63,11 @@
         # }
     }
     if {[ns_ictl epoch] == 0} {
-        nx::Class mixins add xo::DocHelper
+        nx::Class mixins add acs::DocHelper
         #ns_log notice "REGISTER xo::DocHelper INIT epoch [ns_ictl epoch]"
     }
 } else {
-    ns_log error "no NSD/NX available. Installation is apprently incomplete or misconfigured"
+    ns_log error "no NSD/NX available. Installation is apparently incomplete or misconfigured"
 }
 
 #