Index: openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl,v
diff -u -N -r1.20.2.12 -r1.20.2.13
--- openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl	16 Dec 2020 17:14:27 -0000	1.20.2.12
+++ openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl	1 Feb 2021 10:51:09 -0000	1.20.2.13
@@ -52,7 +52,7 @@
         ns_log notice "$p"
         incr count
         set tail [namespace tail $p]
-        set qualifiers [regsub -all "::" [namespace qualifiers $p] "__"]
+        set qualifiers [regsub -all -- "::" [namespace qualifiers $p] "__"]
         if {[regexp $internalUse $p] || [regexp $serverModuleProcs $p] || [regexp $functionalOps $p] || [regexp $xmlRPC $p]} continue
         set pa [nsv_get api_proc_doc $p]
         set protection [expr {[dict exists $pa protection] && "public" in [dict get $pa protection]