Ticket #71231: patch-field-instead-of-has_t-50objectpad.t.diff
File patch-field-instead-of-has_t-50objectpad.t.diff, 516 bytes (added by ballapete (Peter "Pete" Dyballa), 3 days ago) |
---|
-
t/50objectpad.t
old new 8 8 use Object::Pad; 9 9 10 10 class FooBar { 11 has$x :reader = [];11 field $x :reader = []; 12 12 use Sub::HandlesVia::Declare '$x', Array => ( 13 13 all_x => 'all', 14 14 add_x => 'push', 15 15 ); 16 16 17 has@y;17 field @y; 18 18 use Sub::HandlesVia::Declare '@y', ( 19 19 all_y => 'all', 20 20 add_y => 'push', 21 21 ); 22 22 23 has%z;23 field %z; 24 24 use Sub::HandlesVia::Declare '%z', ( 25 25 all_z => 'all', 26 26 add_z => 'set',