diff options
| author | damien <damien@mandriva.com> | 2001-04-08 03:50:24 +0000 |
|---|---|---|
| committer | damien <damien@mandriva.com> | 2001-04-08 03:50:24 +0000 |
| commit | fd797552b2a0ecc1b999e0b4d7dadade63aece5a (patch) | |
| tree | 724a812bd77fbeaae30c41b76e9689075e46550a | |
| parent | 29b67cac16924355f2be70a136d7ff08a5cf5848 (diff) | |
| download | drakx-backup-do-not-use-fd797552b2a0ecc1b999e0b4d7dadade63aece5a.tar drakx-backup-do-not-use-fd797552b2a0ecc1b999e0b4d7dadade63aece5a.tar.gz drakx-backup-do-not-use-fd797552b2a0ecc1b999e0b4d7dadade63aece5a.tar.bz2 drakx-backup-do-not-use-fd797552b2a0ecc1b999e0b4d7dadade63aece5a.tar.xz drakx-backup-do-not-use-fd797552b2a0ecc1b999e0b4d7dadade63aece5a.zip | |
added package installation
| -rw-r--r-- | perl-install/tinyfirewall.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/tinyfirewall.pm b/perl-install/tinyfirewall.pm index 739baf934..51a24d01d 100644 --- a/perl-install/tinyfirewall.pm +++ b/perl-install/tinyfirewall.pm @@ -133,6 +133,7 @@ my $popimap = sub { my $quit = sub { $_[0] or $in->exit(0); SaveConfig(); + $in->standalone::pkgs_install(Kernel22() ? "ipchains" : "iptables"); system($_) foreach ("/bin/cp /usr/share/Bastille/bastille-ipchains /usr/share/Bastille/bastille-netfilter /sbin", "/bin/cp /usr/share/Bastille/bastille-firewall /etc/rc.d/init.d/", "/bin/chmod 0700 /etc/rc.d/init.d/bastille-firewall", "/bin/chmod 0700 /sbin/bastille-ipchains", @@ -170,7 +171,7 @@ my $popimap = sub { if (!Kernel22()) { pop @struct; pop @struct; pop @struct; @struct = ( @struct, [undef , "Don't Save", "Save & Quit", $quit ] ); - @messages[9]=@messages[11]; + $messages[9]=$messages[11]; } for (my $i=0;$i<@struct;$i++) { $::Wizard_no_previous = $i == 0; |