4
4
use Test::More tests => 3; # last test to print
10
is_deeply( TestPackage->Alpha->{orig}, TestPackage->Alpha->{mx}, 'Basic Use Case', );
11
is_deeply( TestPackage->Beta->{orig}, TestPackage->Beta->{mx}, 'Order Invert', );
12
is_deeply( TestPackage->Gamma->{orig}->{default}->(), TestPackage->Gamma->{mx}->{default}->(), 'Subs', );
10
is_deeply( T9Saccharin::TestPackage->Alpha->{orig}, T9Saccharin::TestPackage->Alpha->{mx}, 'Basic Use Case', );
11
is_deeply( T9Saccharin::TestPackage->Beta->{orig}, T9Saccharin::TestPackage->Beta->{mx}, 'Order Invert', );
12
is_deeply( T9Saccharin::TestPackage->Gamma->{orig}->{default}->(), T9Saccharin::TestPackage->Gamma->{mx}->{default}->(), 'Subs',