diff options
author | xocel <xocel@iquidus.org> | 2012-12-30 05:14:37 +1300 |
---|---|---|
committer | xocel <xocel@iquidus.org> | 2012-12-30 05:14:37 +1300 |
commit | a9491fed6e115adb86b8b7bdc94d5a6d4862a703 (patch) | |
tree | 2e50c68f331c357d59e1bd51b3dcbb1e1b51888c /t/prep.pl | |
parent | e452c4871418a5cc9152ed830d641f0ceefba3f2 (diff) | |
download | sbotools2-a9491fed6e115adb86b8b7bdc94d5a6d4862a703.tar.xz |
sboremove: minor fixes, moved get_requires to lib.pm, added tests, updated man page, more comments
Diffstat (limited to 't/prep.pl')
-rwxr-xr-x | t/prep.pl | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -22,6 +22,8 @@ for my $thing (qw(interactive compat32 no_readme jobs distclean noclean pr $thing; } +print {$write} "my \%required_by;\n"; +print {$write} "our \@confirmed;\n"; print {$write} "my \%locations;\n"; print {$write} "my \%commands;\n"; print {$write} "my \%options = (nothing => 'to see here');\n"; @@ -50,7 +52,7 @@ sub get_subs ($) { } } -for my $file (qw(sbocheck sboclean sboconfig sbofind sboupgrade)) { +for my $file (qw(sbocheck sboclean sboconfig sbofind sboupgrade sboremove)) { open my $read, '<', "../$file"; get_subs $read; close $read; |