From e7ba80593d7cb6f1fd45183815e304428d31b2e4 Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Tue, 7 Jan 2014 20:21:26 +0000 Subject: [PATCH] remove temp files git-svn-id: https://svn.fhem.de/fhem/trunk@4587 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/32_mailcheck.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/32_mailcheck.pm b/fhem/FHEM/32_mailcheck.pm index cb8b0d2e3..bad4dc293 100755 --- a/fhem/FHEM/32_mailcheck.pm +++ b/fhem/FHEM/32_mailcheck.pm @@ -98,10 +98,10 @@ mailcheck_Notify($$) return if($dev->{NAME} ne "global"); return if(!grep(m/^INITIALIZED|REREADCFG$/, @{$dev->{CHANGED}})); - delete $modules{mailcheck}->{NotifyFn}; + delete $modules{$hash->{TYPE}}->{NotifyFn}; foreach my $d (keys %defs) { - next if($defs{$d}{TYPE} ne "mailcheck"); + next if($defs{$d}{TYPE} ne $hash->{TYPE}); mailcheck_Connect($defs{$d}); } } @@ -367,6 +367,7 @@ mailcheck_Read($) my $message = $client->message_string($resp); Log3 $name, 5, "message: $message"; my $parser = new MIME::Parser; + $parser->tmp_to_core(1); my $entity = $parser->parse_data($message); #Log3 $name, 5, "mime: $entity";