Index: openacs-4/packages/acs-api-browser/www/proc-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/proc-view.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/acs-api-browser/www/proc-view.tcl 11 Sep 2024 06:15:46 -0000 1.18 +++ openacs-4/packages/acs-api-browser/www/proc-view.tcl 22 Oct 2024 13:45:13 -0000 1.19 @@ -32,6 +32,14 @@ } lappend context [list $proc] +# +# The leading space is of a scope-less object or class is +# trimmed already via package contract. Reconstruct it again. +# +if {[regexp {^(Class|Object) ::} $proc]} { + set proc " $proc" +} + set default_source_p [ad_get_client_property -default 0 acs-api-browser api_doc_source_p] set return_url [export_vars -base [ad_conn url] {proc version_id}] set error_msg ""