From 72c00fd2694fcd801b04993f87c35877931555fb Mon Sep 17 00:00:00 2001 From: Beta-User <> Date: Sat, 24 Oct 2020 15:35:48 +0000 Subject: [PATCH] 59_Twilight.pm: add daylightsaving feature git-svn-id: https://svn.fhem.de/fhem/trunk@23018 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/59_Twilight.pm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/fhem/FHEM/59_Twilight.pm b/fhem/FHEM/59_Twilight.pm index 7d2d66a89..83aa6197f 100644 --- a/fhem/FHEM/59_Twilight.pm +++ b/fhem/FHEM/59_Twilight.pm @@ -773,6 +773,10 @@ sub Twilight_Midnight { } my $now = time(); my $midnight = $now - secondsSinceMidnight( $now ) + DAYSECONDS + 1; + my $daysavingdelta = (localtime)[2] - ( localtime( time + DAYSECONDS ) )[2]; + $midnight -= 19 * HOURSECONDS if $daysavingdelta == 1 && (localtime)[2] < 3; + $midnight -= 20 * HOURSECONDS if $daysavingdelta == -1 && (localtime)[2] < 3; + return resetRegisteredInternalTimer( "Midnight", $midnight, \&Twilight_Midnight, $hash, 0 ); }