···6161 # Remember choice alternatives ("> 1. bla (FOO)" or " 2. bla (BAR) (NEW)").
6262 if ($line =~ /^\s*>?\s*(\d+)\.\s+.*?\(([A-Za-z0-9_]+)\)(?:\s+\(NEW\))?\s*$/) {
6363 $choices{$2} = $1;
6464+ } else {
6565+ # The list of choices has ended without us being
6666+ # asked. This happens for options where only one value
6767+ # is valid, for instance. The results can foul up
6868+ # later options, so forget about it.
6969+ %choices = ();
6470 }
65716672 $line = "";