Index: openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl,v diff -u -r1.27.8.3 -r1.27.8.4 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 5 Sep 2013 18:09:58 -0000 1.27.8.3 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 6 Sep 2013 11:39:37 -0000 1.27.8.4 @@ -1112,9 +1112,9 @@ set procl [length_proc [string range $data $i end]] set proc_name [string range $data $i $i+$procl] - if {$proc_name in $KEYWORDS $proc_name || + if {$proc_name in $KEYWORDS || ([regexp {^::(.*)} $proc_name match had_colons] && - $had_colons in $KEYWORDS $had_colons)} { + $had_colons in $KEYWORDS)} { append html "$HTML(procs)${proc_name}$HTML(/procs)" } elseif {$proc_name in $XOTCL_KEYWORDS} { append html "$HTML(procs)${proc_name}$HTML(/procs)"