diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm index aac9a3c..3af624d 100644 --- a/73_AutoShuttersControl.pm +++ b/73_AutoShuttersControl.pm @@ -6007,7 +6007,7 @@ sub getTimeUpEarly { } return ( - $val =~ /^(?:[01]\d|2[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ + $val =~ /^(?:[01]\d|2?[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ ? $val : '05:00' ); @@ -6022,7 +6022,7 @@ sub getTimeUpLate { } return ( - $val =~ /^(?:[01]\d|2[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ + $val =~ /^(?:[01]\d|2?[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ ? $val : '08:30' ); @@ -6037,7 +6037,7 @@ sub getTimeDownEarly { } return ( - $val =~ /^(?:[01]\d|2[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ + $val =~ /^(?:[01]\d|2?[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ ? $val : '16:00' ); @@ -6052,7 +6052,7 @@ sub getTimeDownLate { } return ( - $val =~ /^(?:[01]\d|2[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ + $val =~ /^(?:[01]\d|2?[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ ? $val : '22:00' ); @@ -6068,7 +6068,7 @@ sub getTimeUpWeHoliday { } return ( - $val =~ /^(?:[01]\d|2[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ + $val =~ /^(?:[01]\d|2?[0-3]):(?:[0-5]\d)(:(?:[0-5]\d))?$/ ? $val : '08:00' ); @@ -7780,7 +7780,7 @@ sub getblockAscDrivesAfterManual { ], "release_status": "under develop", "license": "GPL_2", - "version": "v0.8.3", + "version": "v0.8.4", "author": [ "Marko Oldenburg " ],