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:
parent
68536172a0
commit
bd5e146663
@ -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
|
||||||
|
@ -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) );
|
||||||
|
Loading…
Reference in New Issue
Block a user