From 5f75e4511d31d7d01bd9d4a3cf6dd24e083a3ebc Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Mon, 30 Nov 2015 12:33:23 +0000 Subject: [PATCH] 32_yowsup.pm: allow sending text with images git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@10056 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/32_yowsup.pm | 25 +++++++++++++++++-------- 1 file changed, 17 insertions(+), 8 deletions(-) diff --git a/FHEM/32_yowsup.pm b/FHEM/32_yowsup.pm index efc424043..1fd353d97 100644 --- a/FHEM/32_yowsup.pm +++ b/FHEM/32_yowsup.pm @@ -258,13 +258,20 @@ yowsup_Set($$@) if( $cmd eq 'image' ) { return "MASTER not connected" if( !$phash->{PID} ); + readingsSingleUpdate( $hash, 'sent', 'image: '. join( ' ', @args ), 1 ); + + my $number = $hash->{NUMBER}; + $number =~ s/\./-/; + + my $image = shift(@args); + return yowsup_Write( $phash, "/image send $hash->{NUMBER} $args[0]" ); return undef; } elsif( $cmd eq 'send' ) { return "MASTER not connected" if( !$phash->{PID} ); - readingsSingleUpdate( $hash, "sent", join( ' ', @args ), 1 ); + readingsSingleUpdate( $hash, 'sent', join( ' ', @args ), 1 ); my $number = $hash->{NUMBER}; $number =~ s/\./-/; @@ -284,17 +291,19 @@ yowsup_Set($$@) return undef; } elsif( $cmd eq 'image' ) { - readingsSingleUpdate( $hash, "sent", 'image: '. join( ' ', @args ), 1 ); + readingsSingleUpdate( $hash, 'sent', 'image: '. join( ' ', @args ), 1 ); my $number = shift(@args); $number =~ s/\./-/; - return yowsup_Write( $hash, "/image send $number $args[0]" ); + my $image = shift(@args); + + return yowsup_Write( $hash, "/image send $number $image '". join( ' ', @args ) ."'" ); return undef; } elsif( $cmd eq 'send' ) { - readingsSingleUpdate( $hash, "sent", join( ' ', @args ), 1 ); + readingsSingleUpdate( $hash, 'sent', join( ' ', @args ), 1 ); my $number = shift(@args); $number =~ s/\./-/; @@ -592,10 +601,10 @@ yowsup_Attr($$$) Set