2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 12:49:34 +00:00

21_HEOSPlayer: add input URL as set command

git-svn-id: https://svn.fhem.de/fhem/trunk@15920 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
LeonGaultier 2018-01-18 05:13:08 +00:00
parent 68536172a0
commit bd5e146663
2 changed files with 11 additions and 1 deletions

View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it. # Do not insert empty lines here, update check depends on it.
- feature: 21_HEOSPlayer: add input URL as set command
- feature: 74_Unifi: add new set command to en-/disable Site Status-LEDs - feature: 74_Unifi: add new set command to en-/disable Site Status-LEDs
- bugfix: 74_XiaomiBTLESens: fix ssh gatttool which test - bugfix: 74_XiaomiBTLESens: fix ssh gatttool which test
- new: 74_XiaomiBTLESens: modul replace 74_XiaomiFlowerSens, add Support - new: 74_XiaomiBTLESens: modul replace 74_XiaomiFlowerSens, add Support

View File

@ -39,7 +39,7 @@ use Encode qw(encode_utf8);
use URI::Escape; use URI::Escape;
#use Data::Dumper; #use Data::Dumper;
my $version = "1.0.1"; my $version = "1.0.2";
@ -712,6 +712,15 @@ sub HEOSPlayer_Set($$@) {
$heosCmd = 'playQueueItem'; $heosCmd = 'playQueueItem';
$action = "qid=$cid"; $action = "qid=$cid";
} elsif ( $sid eq "url" ) {
#URL abspielen
$heosCmd = 'playStream';
#$action = "url=".substr($param,4);
$action = "url=$cid";
#getestet mit "set HEOSPlayer_Name input url,http://sender.eldoradio.de:8000/128.mp3" ich wollte [cid] nicht nutzen da in einer url ja durchaus mehrere Kommata vorkommen können ob das mit dem substr() so toll ich kann ich leider nicht beurteilen. Auch würde ich bei der $sid ein lc($sid) drum machen aber da es nirgendwo ist :-)
} else { } else {
if ( $sid > 0 && $sid < 1024 ) { if ( $sid > 0 && $sid < 1024 ) {
return "usage: $cmd sid,cid,mid" unless( defined($cid) && defined($mid) ); return "usage: $cmd sid,cid,mid" unless( defined($cid) && defined($mid) );