From 089e425ff4a0c9103468b54eb576bc1724f4034a Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Sat, 28 Nov 2015 12:50:08 +0000 Subject: [PATCH] 32_mailcheck.pm: use only address part of From git-svn-id: https://svn.fhem.de/fhem/trunk@10031 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/32_mailcheck.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/fhem/FHEM/32_mailcheck.pm b/fhem/FHEM/32_mailcheck.pm index 0eb136897..f893efcf2 100755 --- a/fhem/FHEM/32_mailcheck.pm +++ b/fhem/FHEM/32_mailcheck.pm @@ -375,8 +375,10 @@ mailcheck_Read($) my $msg_count = $client->unseen_count||0; if ($msg_count > 0) { my $from = $client->get_header($resp, "From"); - $from =~ s/<[^>]*>//g; #strip the email, only display the sender's name Log3 $name, 4, "from: $from"; + if( $from =~ m/<([^>]*)>/ ) { + $from = $1; + } my $subject = $client->get_header($resp, "Subject"); Log3 $name, 4, "subject: $subject";