Program Repair Shop

Testing undocumented behavior

        my $num_observers_copied = eval {
            $playlist[0]->copy_observers( $playlist[1] )
        };

        is( $playlist[1]->count_observers, 5,
            'New object has correct number of observers' );

Before the copy, $playlist[1] had two observers
Before the copy, $playlist[0] has those two, plus another
The test is requiring that $playlist[1] be given duplicate observers
- Even though the manual suggests that that is the wrong behavior
- Even though it is the wrong behavior
- Grrr.

        is( $playlist[1]->count_observers, 3,
            'New object has correct number of observers' );