mirror of
https://github.com/fspc/dswim.git
synced 2025-02-22 16:43:23 -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"} ||
|
if ($commands->{"scripts"} || $commands->{"preinst"} ||
|
||||||
$commands->{"postinst"} || $commands->{"prerm"} ||
|
$commands->{"postinst"} || $commands->{"prerm"} ||
|
||||||
$commands->{"postrm"} || $commands{"config"} || $commands{"templates"}) {
|
$commands->{"postrm"} || $commands->{"config"} || $commands->{"templates"}) {
|
||||||
scripts(\%commands);
|
scripts(\%commands);
|
||||||
}
|
}
|
||||||
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
||||||
@ -101,10 +101,10 @@ sub description {
|
|||||||
|
|
||||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"})) {
|
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||||
$commands->{"r"} || $commands->{"purge"}) {
|
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
@ -127,7 +127,7 @@ sub q_description {
|
|||||||
|
|
||||||
if ($commands->{"scripts"} || $commands->{"preinst"} ||
|
if ($commands->{"scripts"} || $commands->{"preinst"} ||
|
||||||
$commands->{"postinst"} || $commands->{"prerm"} ||
|
$commands->{"postinst"} || $commands->{"prerm"} ||
|
||||||
$commands->{"postrm"} || $commands{"config"} || $commands{"templates"}) {
|
$commands->{"postrm"} || $commands->{"config"} || $commands->{"templates"}) {
|
||||||
scripts(\%commands);
|
scripts(\%commands);
|
||||||
}
|
}
|
||||||
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
menu(\%commands) if $commands->{"menu"} || $commands->{"m"};
|
||||||
@ -245,10 +245,10 @@ sub q_description {
|
|||||||
if (!defined $file_now &&
|
if (!defined $file_now &&
|
||||||
!($commands->{"z"} || $commands->{"ftp"} ||
|
!($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"})) {
|
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||||
$commands->{"r"} || $commands->{"purge"}) {
|
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
|
@ -545,10 +545,10 @@ sub file {
|
|||||||
if (defined $file_now && !($commands->{"z"} ||
|
if (defined $file_now && !($commands->{"z"} ||
|
||||||
$commands->{"ftp"} ||
|
$commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"})) {
|
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||||
if ($commands{"x"} || $commands{"ftp"} || $commands{"source"} ||
|
if ($commands{"x"} || $commands{"ftp"} || $commands{"source"} ||
|
||||||
$commands{"source_only"} || $commands{"remove"} ||
|
$commands{"source_only"} || $commands{"remove"} ||
|
||||||
$commands{"r"} || $commands{"purge"}) {
|
$commands{"r"} || $commands{"purge"} || $commands->{"reinstall"} ) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
|
@ -69,7 +69,7 @@ sub findexer {
|
|||||||
@PACKAGES = @alot;
|
@PACKAGES = @alot;
|
||||||
if ($commands->{"z"} || $commands->{"ftp"} ||
|
if ($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"}) {
|
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
@ -243,10 +243,10 @@ sub findexer {
|
|||||||
|
|
||||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"})) {
|
$commands->{"purge"}|| $commands->{"reinstall"} )) {
|
||||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||||
$commands->{"r"} || $commands->{"purge"}) {
|
$commands->{"r"} || $commands->{"purge"}|| $commands->{"reinstall"} ) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
@ -298,7 +298,7 @@ sub qindexer {
|
|||||||
@PACKAGES = @alot;
|
@PACKAGES = @alot;
|
||||||
if ($commands->{"z"} || $commands->{"ftp"} ||
|
if ($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"}) {
|
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
|
@ -356,7 +356,7 @@ sub indexer {
|
|||||||
}
|
}
|
||||||
if ($commands->{"z"} || $commands->{"ftp"}||
|
if ($commands->{"z"} || $commands->{"ftp"}||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"}) {
|
$commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
@ -498,10 +498,10 @@ sub indexer {
|
|||||||
}
|
}
|
||||||
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
if (!($commands->{"z"} || $commands->{"ftp"} ||
|
||||||
$commands->{"remove"} || $commands->{"r"} ||
|
$commands->{"remove"} || $commands->{"r"} ||
|
||||||
$commands->{"purge"})) {
|
$commands->{"purge"} || $commands->{"reinstall"})) {
|
||||||
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
if ($commands->{"x"} || $commands->{"ftp"} || $commands->{"source"} ||
|
||||||
$commands->{"source_only"} || $commands->{"remove"} ||
|
$commands->{"source_only"} || $commands->{"remove"} ||
|
||||||
$commands->{"r"} || $commands->{"purge"}) {
|
$commands->{"r"} || $commands->{"purge"} || $commands->{"reinstall"}) {
|
||||||
require SWIM::Safex;
|
require SWIM::Safex;
|
||||||
SWIM::Safex->import(qw(safex));
|
SWIM::Safex->import(qw(safex));
|
||||||
safex(\%commands);
|
safex(\%commands);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user