@@ -93,7 +93,7 @@ sub parse {
warning(_g("short option not allowed in %s, line %d"), $desc, $.);
next;
}
- if (/^(\S+)(?:=(.*))?$/) {
+ if (/^([^=]+)(?:=(.*))?$/) {
my ($name, $value) = ($1, $2);
$name = "--$name" unless $name =~ /^-/;
if (defined $value) {