snake case

lib/CF/Controller/Program.pm

@@ -15,8 +15,8 @@ sub entries {
     while ( my $entry = $entries->next ) {
         push @entries, $c->spec_filter( {
             $entry->get_columns,
-            expectedStartAt  => $c->format_timestamp( $entry->start, '%H:%M' ),
-            expectedFinishAt => $c->format_timestamp( $entry->finish, '%H:%M' ),
+            expected_start_at  => $c->format_timestamp( $entry->start, '%H:%M' ),
+            expected_finish_at => $c->format_timestamp( $entry->finish, '%H:%M' ),
         }, 'ProgramScheduleEntry');
     }