diff options
author | xocel <xocel@iquidus.org> | 2012-10-15 22:29:30 +1300 |
---|---|---|
committer | xocel <xocel@iquidus.org> | 2012-10-15 22:29:30 +1300 |
commit | ac2af580034db85199572cf6c49c90e233a5d323 (patch) | |
tree | 63e3bd41284b282b4a97beb33ddfa429cda92e74 | |
parent | 901c1458ec200d341703bd92e79f35f5049c3368 (diff) | |
download | sbotools2-ac2af580034db85199572cf6c49c90e233a5d323.tar.xz |
sboremove: changed -f to -a
-rwxr-xr-x | sboremove | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -28,21 +28,21 @@ Options (defaults shown first where applicable): version information. -R|--norequirements: do not parse requirements. - -f|--force: - prompt to remove, even if required by other packages on system. + -a|--alwaysask: + always ask to remove, even if required by other packages on system. Note: optional dependencies need to be removed separately. EOF } -my ($help, $vers, $non_int, $no_reqs, $force, @excluded); +my ($help, $vers, $non_int, $no_reqs, $alwaysask, @excluded); GetOptions ( 'help|h' => \$help, 'version|v' => \$vers, 'norequirements|R' => \$no_reqs, - 'force|f' => \$force, + 'alwaysask|a' => \$alwaysask, ); show_usage and exit 0 if $help; @@ -130,7 +130,7 @@ for my $pkg (@$remove_queue) { for my $val (@req_by) { if ( $val ~~ @confirmed ) { $cnf_count++; } } - if ($cnf_count == $req_count or $is_rootpkg or $force) { + if ($cnf_count == $req_count or $is_rootpkg or $alwaysask) { say $pkg; if ( $req_by_line ) { say "Required by: $req_by_line"; |