Program Repair Shop

64

Testing undocumented behavior

Here's one that's even worse:

        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' );