now when using a Perlcommand it will always be executed, not only when old parameter isnt like the new Parameter.

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@4146 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/98_Heating_Control.pm

@@ -441,7 +441,7 @@ sub Heating_Control_Device_Schalten($$$$) {
 
   #Kommando ausf<73>hren
   my $secondsSinceSwitch = $nowSwitch - $now;
-  if ($nowSwitch gt "" && $aktParam ne $newParam ) {
+  if (defined $hash->{helper}{COMMAND} || ($nowSwitch gt "" && $aktParam ne $newParam )) {
      if (!SwitchInVergangenheit($hash) && $secondsSinceSwitch < -60) {
         Log3 $hash, 5, $mod."no switch in the yesterdays because of the devices type.";
      } else {