Commit ba638908 authored by Robert Ricci's avatar Robert Ricci

Add explicit check for malformed type strings

parent 0310485e
......@@ -117,6 +117,11 @@ sub new($$$;$) {
return undef;
}
$self->{SWITCHTYPE} = $1;
if (!$self->{SWITCHTYPE}) {
warn "ERROR: Unable to determine type of switch $self->{NAME} from " .
"string '$options->{type}'\n";
return undef;
}
if ($2) {
$self->{NON_MODULAR_HACK} = 1;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment