Commit f44d3d18 authored by Leigh B Stoller's avatar Leigh B Stoller

Ug, loadinfo ADDR is a URL which can have = signs. Adjust parsing.

parent cbfa24fb
......@@ -2162,7 +2162,17 @@ sub getloadinfo($)
foreach my $kv (@kvs) {
my @kvpair = split(/=/,$kv);
if (scalar(@kvpair) != 2) {
warn("*** WARNING: malformed key-val pair in loadinfo: $kv\n");
#
# Ick. ADDR is a URL.
#
if ($kvpair[0] eq "ADDR") {
my $key = shift(@kvpair);
$resh{$key} = join("=", @kvpair);
}
else {
warn("*** WARNING: ".
"malformed key-val pair in loadinfo: $kv\n");
}
}
else {
$resh{$kvpair[0]} = $kvpair[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