Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v diff -u -r1.56 -r1.57 --- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl 21 May 2018 16:40:47 -0000 1.56 +++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl 16 Jun 2018 00:01:45 -0000 1.57 @@ -690,7 +690,8 @@ ad_proc -public ::foobar::new { {-oacs_user:boolean} - {-shazam} + {-shazam:required} + {-foo} {-user_id ""} } { The documentation for this procedure should have a brief description of the @@ -701,15 +702,20 @@ \@author Roberto Mello \@creation-date 2002-01-21 - - \@param oacs_user If this user is already an OpenACS user. oacs_user_p will be defined. - \@param shazam Magical incantation that calls Captain Marvel. Required parameter. - \@param user_id The id for the user to process. Optional with default "" - (api-browser will show the default automatically) + + \@param oacs_user If this user is already an OpenACS user. oacs_user_p is defined + per default as "false", when specified as "true". The parameter is optional. + \@param shazam Magical incantation that calls Captain Marvel. Required parameter. + \@param foo parameter, which can be omitted. Check with [info exists ...] if was given. + \@param user_id The id for the user to process. Optional with default "" + (api-browser shows the default). } { if { $user_id eq "" } { # Do something if this is not an empty string } + if { [info exists foo] } { + # Do something if we got a value for "foo" + } if { $oacs_user_p } { # Do something if this is an OpenACS user