Index: openacs-4/packages/xotcl-core/www/show-object.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/www/show-object.tcl,v diff -u -r1.15.6.6 -r1.15.6.7 --- openacs-4/packages/xotcl-core/www/show-object.tcl 14 Feb 2014 18:23:18 -0000 1.15.6.6 +++ openacs-4/packages/xotcl-core/www/show-object.tcl 31 Jul 2014 13:50:10 -0000 1.15.6.7 @@ -213,6 +213,18 @@ array set doc_elements [nsv_get api_library_doc $index] append output [lindex $doc_elements(main) 0] append output "
\n" + if { [info exists doc_elements(param)] } { + append output "
Documented Parameters:\n" + foreach par $doc_elements(param) { + append output "
-[lindex $par 0] [lrange $par 1 end]\n" + } + } + if { [info exists doc_elements(see)] } { + append output "
See Also:\n" + foreach seeref $doc_elements(see) { + append output "
[api_format_see $seeref]\n" + } + } if { [info exists doc_elements(creation-date)] } { append output "
Created:\n
[lindex $doc_elements(creation-date) 0]\n" }