Handle whitespace better in import script

Make the import script handle multiple, rather than just single,
whitespace separators between source and destination files.

Change-Id: I0cc0fdd6ba1ef4bd5407b2e0fd9285ffe902408b
Reviewed-on: http://gerrit.openafs.org/2572
Tested-by: BuildBot <buildbot@rampaginggeek.com>
Reviewed-by: Derrick Brashear <shadow@dementia.org>
Tested-by: Derrick Brashear <shadow@dementia.org>
This commit is contained in:
Simon Wilkinson 2010-05-16 13:04:47 +01:00 committed by Derrick Brashear
parent eb49bd3df0
commit f9498799de

View File

@ -49,7 +49,7 @@ my $fh = IO::File->new("$externalDir/$module-files")
or die "Couldn't open mapping file : $!\n";
while (<$fh>) {
next if /^\s#/;
if (/^(.+)\s+(.+)$/) {
if (/^(\S+)\s+(\S+)$/) {
$mapping{$1} = $2;
} elsif (/\w+/) {
die "Unrecognised line in mapping file : $_\n";