Bug 325361: When an event is scheduled at midnight of a given day of the month,…

editwhines.cgi

@@ -220,8 +220,8 @@ if ($cgi->param('update')) {
                 else {
                     my $o_day         = $cgi->param("orig_day_$sid") || '';
                     my $day           = $cgi->param("day_$sid") || '';
-                    my $o_time        = $cgi->param("orig_time_$sid") || '';
-                    my $time          = $cgi->param("time_$sid") || '';
+                    my $o_time        = $cgi->param("orig_time_$sid") || 0;
+                    my $time          = $cgi->param("time_$sid") || 0;
                     my $o_mailto      = $cgi->param("orig_mailto_$sid") || '';
                     my $mailto        = $cgi->param("mailto_$sid") || '';
                     my $o_mailto_type = $cgi->param("orig_mailto_type_$sid") || 0;

whine.pl

@@ -564,6 +564,10 @@ sub reset_timer {
     $sth->execute($schedule_id);
     my ($run_day, $run_time) = $sth->fetchrow_array;
 
+    # It may happen that the run_time field is NULL or blank due to
+    # a bug in editwhines.cgi when this field was initially 0.
+    $run_time ||= 0;
+
     my $run_today = 0;
     my $minute_offset = 0;