5 <define-tag question endtag=required>
10 <set-var id="<:=++$quest_count:>">
14 <h3><a name="<get-var id>"><strong><:=++$nr_question:>. <get-var q></strong></a></h3>
30 if (open (F, $WML_SRC_FILENAME)) {
32 if (m,[<]question id="?([^"]+)"? q="(.*)">,) {
33 if (exists $ids{$1}) {
34 print "m4_changequote({, })\n";
35 printf "m4_errprint({Warning: FAQ id %s already assigned.\n})\n", $1;
36 print "m4_changequote()\n";
40 printf "<li> <a href=\"#%s\">%s</a>\n", $1, $2;
41 } elsif (m,[<]question q="(.*)">,) {
44 printf "<li> <a href=\"#%d\">%s</a>\n", $numid, $1;