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.83 -r1.84 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 29 Oct 2024 16:37:43 -0000 1.83 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 3 Nov 2024 09:50:39 -0000 1.84 @@ -663,7 +663,7 @@ # # Make sure we have the newest update in the nsv # - ::xo::api update_object_doc $scope $cl "" + ::xo::api update_object_doc $scope [expr {[string match ::* $cl] ? $cl :"::$cl"}] "" } else { set xotclArgs 0 if {[namespace which ::xo::api] ne "" && [::xo::api isobject "" [lindex $proc_name 1]]} { @@ -827,6 +827,8 @@ # The method is defined on a class # set methodSyntax [xo::api method_link -label $methodSyntax $containerObject instproc $m] + } else { + set methodSyntax [xo::api method_link -label $methodSyntax $containerObject proc $m] } append blocks_out "
  • $methodSyntax
  • \n" }