|
@@ -55,7 +55,7 @@ sub parse_file($$) {
|
|
|
$line++;
|
|
|
next unless /\S/;
|
|
|
|
|
|
- my ($type, $flags, $name, $urls) = m!^src-(\w+)((?:\s+--\w+(?:=\S+)?)*)\s+(\w+)(?:\s+(\S.*))?$!;
|
|
|
+ my ($type, $flags, $name, $urls) = m!^src-([\w\-]+)((?:\s+--\w+(?:=\S+)?)*)\s+(\w+)(?:\s+(\S.*))?$!;
|
|
|
unless ($type && $name) {
|
|
|
die "Syntax error in $fname, line $line\n";
|
|
|
}
|