| changeset 56 | 3c33846e5686 |
| parent 48 | a1b051269c2e |
| 55:a26ac4455cc5 | 56:3c33846e5686 |
|---|---|
12 |
12 |
13 use fields qw(repo); |
13 use fields qw(repo); |
14 use base qw(Class::Accessor::Fast); |
14 use base qw(Class::Accessor::Fast); |
15 |
15 |
16 __PACKAGE__->follow_best_practice; |
16 __PACKAGE__->follow_best_practice; |
17 __PACKAGE__->mk_accessors qw(repo); |
17 __PACKAGE__->mk_accessors (qw(repo)); |
18 |
18 |
19 # print output of external commands |
19 # print output of external commands |
20 # |
20 # |
21 my $external_output = 1; |
21 my $external_output = 1; |
22 |
22 |