diff options
| -rwxr-xr-x | kolab_wizard/Kolab.pm | 22 |
1 files changed, 12 insertions, 10 deletions
diff --git a/kolab_wizard/Kolab.pm b/kolab_wizard/Kolab.pm index 7fd82449..4e7628c5 100755 --- a/kolab_wizard/Kolab.pm +++ b/kolab_wizard/Kolab.pm @@ -58,7 +58,7 @@ $o->{pages} = { welcome => { name => N("Welcome to the Kolab Groupware server configuration Wizard.") . "\n\n" . N("Kolab is a secure, scalable and reliable groupware server. Some of the major features include: a web administration interface, a shared address book with provision for mailbox users as well as contacts and a POP3 as well as IMAP4(rev1) access to mail") . "\n\n" . N("Warning: Kolab needs to configure many other services: Proftpd, LDAP, Cyrus, Postfix, Imap, Saslauth. Wizard will make a backup of all your previous configuration files for these services."), no_back => 1, - post => \&rpm_needed_kolab, +# post => \&rpm_needed_kolab, next => 'password', }, # hostname => { @@ -103,26 +103,28 @@ $o->{pages} = { }, }; -sub new { - my ($class) = @_; - bless { - o => $o, - }, $class; -} sub rpm_needed_kolab { my $in = 'interactive'->vnew('su', 'Installing Kolab'); my $w = $in->wait_message(N("Install in progress"), N("Installing Kolab server on your system...")); - system("urpmi --auto kolab-server"); + system("urpmi --no-verify-rpm --auto kolab-server"); undef $w; - if (!$in->do_pkgs->is_installed("kolab-server")) { + if (!$in->do_pkgs->is_installed("kolab-server")) { $::Wizard_finished = 1; $in->ask_okcancel(N("Error"), N("Installation failed")); $in->exit; - } } + +sub new { + my ($class) = @_; + rpm_needed_kolab(); + bless { + o => $o, + }, $class; +} + sub backup_conf { my @conf = qw(/etc/postfix/main.cf /etc/postfix/master.cf |