Bug 37309: Adjust test
The test to catch wrong "op" in posted form was not supporting single quotes. Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
parent
cb9a05a713
commit
75e81d921a
|
|
@ -58,10 +58,10 @@ sub catch_missing_op {
|
|||
$in_form = 1;
|
||||
$line_open_form = $line_number;
|
||||
}
|
||||
if ( $in_form && $line =~ m{name="op"} ) {
|
||||
if ( $in_form && $line =~ m{name=('|")op('|")} ) {
|
||||
$has_op = 1;
|
||||
if ( $line =~ m{value="(.*)"} ) {
|
||||
$op_value = $1;
|
||||
if ( $line =~ m{value=('|")([^'"]*)('|")} ) {
|
||||
$op_value = $2;
|
||||
}
|
||||
}
|
||||
if ( $in_form && $line =~ m{</form} ) {
|
||||
|
|
|
|||
Loading…
Reference in New Issue