Index: openacs-4/packages/acs-api-browser/www/procs-file-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/procs-file-view.tcl,v diff -u -r1.3.10.5 -r1.3.10.6 --- openacs-4/packages/acs-api-browser/www/procs-file-view.tcl 10 Sep 2014 20:19:27 -0000 1.3.10.5 +++ openacs-4/packages/acs-api-browser/www/procs-file-view.tcl 11 Sep 2014 08:01:05 -0000 1.3.10.6 @@ -5,7 +5,8 @@ } { version_id:naturalnum,optional { public_p "" } - path + path:trim + source_p:integer,optional,trim } -properties { title:onevalue context:onevalue @@ -15,6 +16,12 @@ proc_doc_list:multirow } +set url_vars [export_vars -url {path version_id}] +set default_source_p [ad_get_client_property -default 0 acs-api-browser api_doc_source_p] +if { ![info exists source_p] } { + set source_p $default_source_p +} + if { ![info exists version_id] && [regexp {^packages/([^ /]+)/} $path "" package_key] } { db_0or1row version_id_from_package_key {