summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-03-23 13:52:02 +0000
committerdamien <damien@mandriva.com>2001-03-23 13:52:02 +0000
commit8e9fea36c1c50c17506b6ba37257817d11be68d5 (patch)
treed002e17a637b84a1482577dca7d61a752b426944 /perl-install
parent6d02f8e42826599188185541667ddd49608d01a4 (diff)
downloaddrakx-8e9fea36c1c50c17506b6ba37257817d11be68d5.tar
drakx-8e9fea36c1c50c17506b6ba37257817d11be68d5.tar.gz
drakx-8e9fea36c1c50c17506b6ba37257817d11be68d5.tar.bz2
drakx-8e9fea36c1c50c17506b6ba37257817d11be68d5.tar.xz
drakx-8e9fea36c1c50c17506b6ba37257817d11be68d5.zip
correctedd typo
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/tinyfirewall.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/tinyfirewall.pm b/perl-install/tinyfirewall.pm
index 7ce984c2a..c4fc7c871 100644
--- a/perl-install/tinyfirewall.pm
+++ b/perl-install/tinyfirewall.pm
@@ -135,7 +135,7 @@ sub DoInterface {
$messages[$i],
[ $yes, $no ], or_( map { $_ && CheckService($_->[0], $_->[1]) } (@$l[4..6])) ? $yes : $no
)) {
- map { $_ and Service ($e=~/Yes/, $_->[0], $_->[1]) } (@{@struct[$i]}[4..6]);
+ map { $_ and Service($e=~/Yes/, $_->[0], $_->[1]) } (@{$struct[$i]}[4..6]);
$struct[$i][3] and $struct[$i][3]->($e=~/Yes/);
} else {
prev: