diff options
author | xocel <xocel@iquidus.org> | 2012-10-28 11:06:50 +1300 |
---|---|---|
committer | xocel <xocel@iquidus.org> | 2012-10-28 11:06:50 +1300 |
commit | f7978f0646b0e5f6384e445aef1d965448027608 (patch) | |
tree | aed5c7d4c35881f6e833b748e1148bc99ffdc184 | |
parent | 3fdae005e5329f6a7dff968a98eacdda9eba85c9 (diff) | |
download | sbotools2-f7978f0646b0e5f6384e445aef1d965448027608.tar.xz |
sboremove: minor changes
-rwxr-xr-x | sboremove | 6 | ||||
-rwxr-xr-x | sboupgrade | 9 |
2 files changed, 4 insertions, 11 deletions
@@ -136,7 +136,7 @@ for my $pkg (@$remove_queue) { say "Required by: $req_by_line"; } else { unless ($is_rootpkg) { - say "It appears $pkg is no longer required on your system"; + say "It appears $pkg will no longer be required on your system"; } } $is_rootpkg = 0; @@ -189,4 +189,6 @@ for my $instpkg (@confirmed) { system("/sbin/removepkg $instpkg"); } -say "All operations completed successfully." +say "All operations have completed successfully." + +exit 0;
\ No newline at end of file @@ -106,15 +106,6 @@ sub get_readme_path ($) { return $locations{$sbo} .'/README'; } -# for a ref to an array of hashes of installed packages, return an array ref -# consisting of just their names -# sub get_inst_names ($) { -# exists $_[0] or script_error 'get_inst_names requires an argument.'; -# my $inst = shift; -# my @installed; -# push @installed, $$_{name} for @$inst; -# return \@installed; -# } # pull list of requirements sub get_requires ($$) { |