package AppThing;
use lib './lib';
use LEOCHARRE::Class2;
use strict;
__PACKAGE__->make_constructor;
__PACKAGE__->make_accessor_setget_unique_array('_hands');
1;
use Test::Simple 'no_plan';
use strict;
use lib './lib';
print STDERR "\n ============================================ $0 \n\n";
use Smart::Comments '###';
my $href;
ok(1);
my $i = AppThing->new;
ok($i,'instanced');
for my $method ( qw(_hands _hands_count _hands_add _hands_delete _hands_clear _hands_exists)){
ok($i->can($method), "can $method()");
}
print STDERR "\n---------------------line ".__LINE__."\n\n";
ok $i->_hands_add('hi there');
$href = $i->_hands_href;
### $href
ok $i->_hands_count;
ok $i->_hands_delete('hi there');
$href = $i->_hands_href;
### $href