The reason I am seeing these log messages and most others are not is
that I am running SBS 7.6 under flipflip's SSODS
(http://oinkzwurgl.org/ssods), which modifies the shebang line of
slimserver.pl to have the "-w" flag set as in "#!/opt/ssods4/bin/perl
-w". With "-w" in effect, perl warns of many things including using an
uninitialized $map value in the code below.
Code:
--------------------
else {
my $map = $colMap{$tag}; #<== some values of $tag won't be found in %colMap
# so $map may not be defined at this point...
my $value = ref $map eq 'CODE' ? $map->($res) : $res->{$map};
if (defined $value && $value ne '') {
$returnHash{ $tagref->[0] } = $value;
}
}
}
--------------------
Ideally, the possibility that the $tag is not found in %colMap would
have been trapped by the code itself e.g.,
Code:
--------------------
if (defined $map && $map ne '') {
--------------------
could be used to protect the lookup.
--
dsdreamer
----------------------
"Dreamer, easy in the chair that really fits you..."
------------------------------------------------------------------------
dsdreamer's Profile: http://forums.slimdevices.com/member.php?userid=12588
View this thread: http://forums.slimdevices.com/showthread.php?t=79068
_______________________________________________
beta mailing list
[email protected]
http://lists.slimdevices.com/mailman/listinfo/beta
