diff options
| author | damien <damien@mandriva.com> | 2001-03-23 13:52:02 +0000 |
|---|---|---|
| committer | damien <damien@mandriva.com> | 2001-03-23 13:52:02 +0000 |
| commit | 8e9fea36c1c50c17506b6ba37257817d11be68d5 (patch) | |
| tree | d002e17a637b84a1482577dca7d61a752b426944 /perl-install | |
| parent | 6d02f8e42826599188185541667ddd49608d01a4 (diff) | |
| download | drakx-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.pm | 2 |
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: |