FHEM/mod-HEOS
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix The behaviour of a "my", "state", or "our" modified with a statement

Browse Source 
modifier conditional or loop construct (for example, "my $x if ...") is
undefined. The value of the "my" variable may be "undef", any previously
assigned value, or possibly anything else. Don't rely on it. Future
versions of perl might do something different from the version of perl you
try it out on. Here be dragons.
This commit is contained in:
Marko Oldenburg 2021-02-28 19:51:13 +01:00
parent 2bfdbd9c05
commit 89625422f7
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
21_HEOSPlayer.pm
View File

@ -39,7 +39,7 @@ use Encode qw(encode_utf8);
use URI::Escape;
#use Data::Dumper;
my $version = "1.0.4";
my $version = "1.0.5";
@ -603,7 +603,8 @@ sub HEOSPlayer_Set($$@) {
my $mid;
my $cid = $args[0];
my @path = split(",", $args[0]) if ( @args != 0 && $args[0] =~ /,/ );
my @path;
@path = split(",", $args[0]) if ( @args != 0 && $args[0] =~ /,/ );
$cid = $path[0] if ( scalar @path > 0);
$mid = $path[1] if ( scalar @path > 1);