Index: trunk/util/pcblib-param.cgi =================================================================== --- trunk/util/pcblib-param.cgi (revision 342) +++ trunk/util/pcblib-param.cgi (revision 343) @@ -20,6 +20,11 @@ prm=0 q="\"" } + +/@@include/ { + print $2 > "/dev/stderr" +} + (match($0, "@@desc") || match($0, "@@params") || match($0, "@@purpose") || match($0, "@@example")) { txt=$0 key=substr($0, RSTART, RLENGTH) @@ -43,18 +48,22 @@ print HELP["@@desc"] } + if (content) + print "

" content "

" + + if ((print_params) && (HELP["@@params"] != "")) + print "

Ordered list (positions): " HELP["@@params"] + + if (content) { - print "

" content "

" - if (HELP["@@params"] != "") - print "

Ordered list (positions): " HELP["@@params"] print "" for(p = 0; p < prm; p++) - print "
" PARAM[p] + print PARAM[p] print "
" } if (footer) { - print "

Example: " + print "

Example

" print "" print HELP["@@example"] print "" @@ -61,23 +70,32 @@ print "" } } - ' } help() { + local incl n echo "

pcblib-param help for $QS_cmd()

" - help_params -v "header=1" -v "content=$gen parameters" < $gendir/$gen - help_params -v "content=common parameters" < $gendir/common.awk + incl=`tempfile` - help_params -v "footer=1" < $gendir/$gen + help_params -v "header=1" -v "content=$gen parameters" -v "print_params=1" < $gendir/$gen 2>$incl + + for n in `cat $incl` + do + help_params -v "content=parameters (by $n)" < $gendir/$n 2>/dev/null + done + + rm $incl + + help_params -v "footer=1" < $gendir/$gen 2>/dev/null + } error()