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 -N -r1.20 -r1.21
--- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	9 Oct 2005 20:36:19 -0000	1.20
+++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	19 Dec 2006 09:34:10 -0000	1.21
@@ -827,6 +827,8 @@
       # the definition is locally in the connection thread
       return [::Serializer methodSerialize $obj $method $prefix]
     }
+  } elseif {[regexp {^([^ ]+)(Class|Object) (.*)$} $proc_name match thread kind obj]} {
+    return [$thread do $obj serialize]
   } else {
     return [info body $proc_name]
   }