13 DBIx::Class::frobnicate();
17 ], 'expected warnings from carp_once';
21 sub DBIx::Class::frobnicate {
22 DBIx::Class::branch1();
23 DBIx::Class::branch2();
26 sub DBIx::Class::branch1 { carp_once 'carp1' }
27 sub DBIx::Class::branch2 { carp_once 'carp2' }