From 9041b18b1b3f348137d051c923fe2d95995e09a7 Mon Sep 17 00:00:00 2001
From: justme1968 <justme1968@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Tue, 13 Jan 2015 20:03:11 +0000
Subject: [PATCH] 38_netatmo.pm: don't overwrite interval on modify

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7558 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/38_netatmo.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/fhem/FHEM/38_netatmo.pm b/fhem/FHEM/38_netatmo.pm
index 80626042b..6aac45c01 100644
--- a/fhem/FHEM/38_netatmo.pm
+++ b/fhem/FHEM/38_netatmo.pm
@@ -58,7 +58,7 @@ netatmo_Define($$)
 
     $hash->{Device} = $device;
 
-    $hash->{INTERVAL} = 60*5;
+    $hash->{INTERVAL} = 60*5 if( !$hash->{INTERVAL} );
 
     my $d = $modules{$hash->{TYPE}}{defptr}{"D$device"};
     return "device $device already defined as $d->{NAME}" if( defined($d) && $d->{NAME} ne $name );
@@ -123,7 +123,7 @@ netatmo_Define($$)
       $modules{$hash->{TYPE}}{defptr}{"D$device"} = $hash;
     }
 
-    $hash->{INTERVAL} = 60*15;
+    $hash->{INTERVAL} = 60*15 if( !$hash->{INTERVAL} );
 
   } elsif( ($a[2] eq "MODULE" && @a == 5 ) ) {
     $subtype = "MODULE";
@@ -134,7 +134,7 @@ netatmo_Define($$)
     $hash->{Device} = $device;
     $hash->{Module} = $module;
 
-    $hash->{INTERVAL} = 60*5;
+    $hash->{INTERVAL} = 60*5 if( !$hash->{INTERVAL} );
 
     my $d = $modules{$hash->{TYPE}}{defptr}{"M$module"};
     return "module $module already defined as $d->{NAME}" if( defined($d) && $d->{NAME} ne $name );
@@ -1027,7 +1027,7 @@ netatmo_Attr($$$)
   if( $attrName eq "interval" ) {
     my $hash = $defs{$name};
     $hash->{INTERVAL} = $attrVal;
-    $hash->{INTERVAL} = 60*5 if( !$attrVal );
+    $hash->{INTERVAL} = 60*5 if( !$hash->{INTERVAL} );
   } elsif( $attrName eq "disable" ) {
     my $hash = $defs{$name};
     RemoveInternalTimer($hash);