mirror of
https://github.com/fspc/dswim.git
synced 2025-02-22 08:33:24 -05:00
Added --reinstall.
This commit is contained in:
parent
7442e66d5a
commit
0edee5d8c9
12
SWIM/Ag.pm
12
SWIM/Ag.pm
@ -40,7 +40,7 @@ sub description {
|
||||
|
||||
if ($commands->{"scripts"} || $commands->{"preinst"} ||
|
||||
$commands->{"postinst"} || $commands->{"prerm"} ||
|
||||
$commands->{"postrm"} || $commands{"config"} || $commands{"templates"}) {
|
||||
$commands->{"postrm"} || $commands->{"config"} || $commands->{"templates"}) {
|
||||
scripts(\%commands);
|
||||
}
|
||||
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
||||
@ -101,10 +101,10 @@ sub description {
|
||||
|
||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"})) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||
$commands->{"r"} || $commands->{"purge"}) {
|
||||
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
@ -127,7 +127,7 @@ sub q_description {
|
||||
|
||||
if ($commands->{"scripts"} || $commands->{"preinst"} ||
|
||||
$commands->{"postinst"} || $commands->{"prerm"} ||
|
||||
$commands->{"postrm"} || $commands{"config"} || $commands{"templates"}) {
|
||||
$commands->{"postrm"} || $commands->{"config"} || $commands->{"templates"}) {
|
||||
scripts(\%commands);
|
||||
}
|
||||
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
||||
@ -245,10 +245,10 @@ sub q_description {
|
||||
if (!defined $file_now &&
|
||||
!($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"})) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||
$commands->{"r"} || $commands->{"purge"}) {
|
||||
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
|
@ -545,10 +545,10 @@ sub file {
|
||||
if (defined $file_now && !($commands->{"z"} ||
|
||||
$commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"})) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||
if ($commands{"x"} || $commands{"ftp"} || $commands{"source"} ||
|
||||
$commands{"source_only"} || $commands{"remove"} ||
|
||||
$commands{"r"} || $commands{"purge"}) {
|
||||
$commands{"r"} || $commands{"purge"} || $commands->{"reinstall"} ) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
|
@ -69,7 +69,7 @@ sub findexer {
|
||||
@PACKAGES = @alot;
|
||||
if ($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"}) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
@ -243,10 +243,10 @@ sub findexer {
|
||||
|
||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"})) {
|
||||
$commands->{"purge"}|| $commands->{"reinstall"} )) {
|
||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||
$commands->{"r"} || $commands->{"purge"}) {
|
||||
$commands->{"r"} || $commands->{"purge"}|| $commands->{"reinstall"} ) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
@ -298,7 +298,7 @@ sub qindexer {
|
||||
@PACKAGES = @alot;
|
||||
if ($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"}) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
|
@ -356,7 +356,7 @@ sub indexer {
|
||||
}
|
||||
if ($commands->{"z"} || $commands->{"ftp"}||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"}) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
@ -498,10 +498,10 @@ sub indexer {
|
||||
}
|
||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||
$commands->{"remove"} || $commands->{"r"} ||
|
||||
$commands->{"purge"})) {
|
||||
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||
$commands->{"r"} || $commands->{"purge"}) {
|
||||
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||
require SWIM::Safex;
|
||||
SWIM::Safex->import(qw(safex));
|
||||
safex(\%commands);
|
||||
|
Loading…
x
Reference in New Issue
Block a user