From f7978f0646b0e5f6384e445aef1d965448027608 Mon Sep 17 00:00:00 2001 From: xocel Date: Sun, 28 Oct 2012 11:06:50 +1300 Subject: sboremove: minor changes --- sboremove | 6 ++++-- sboupgrade | 9 --------- 2 files changed, 4 insertions(+), 11 deletions(-) diff --git a/sboremove b/sboremove index e4e43ff..5bc0540 100755 --- a/sboremove +++ b/sboremove @@ -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 diff --git a/sboupgrade b/sboupgrade index 7fcdb61..fae66ab 100755 --- a/sboupgrade +++ b/sboupgrade @@ -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 ($$) { -- cgit v1.2.3