diff options
| -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 ($$) { | 
