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.77 -r1.78 --- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 20 Oct 2024 15:23:13 -0000 1.77 +++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl 21 Oct 2024 08:11:40 -0000 1.78 @@ -598,7 +598,7 @@ if { [llength $doc_elements(positionals)] > 0 } { append blocks_out "
Parameters:
\n" foreach positional $doc_elements(positionals) { - set pflags $flags($positional) + set pflags [expr {[info exists flags($positional)] ? $flags($positional) : {}}] if {![info exists default_values($positional)]} { lappend pflags required }