1
0
mirror of https://github.com/fspc/dswim.git synced 2025-02-22 08:33:24 -05:00

Added --reinstall.

This commit is contained in:
freesource 2001-10-15 17:14:21 +00:00
parent 7442e66d5a
commit 0edee5d8c9
4 changed files with 15 additions and 15 deletions

View File

@ -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);

View File

@ -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);

View File

@ -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);

View File

@ -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);