summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-08-24 18:38:04 +0000
committerOlivier Blin <oblin@mandriva.org>2005-08-24 18:38:04 +0000
commit4e827f641935916ad5869d4c3dc9c11a37ca1339 (patch)
tree7c98a4b93733a99520b530e5a821d96cfb7a7a94 /perl-install
parent2f3080a06b1d957d3e2a122a131a799512f81741 (diff)
downloaddrakx-4e827f641935916ad5869d4c3dc9c11a37ca1339.tar
drakx-4e827f641935916ad5869d4c3dc9c11a37ca1339.tar.gz
drakx-4e827f641935916ad5869d4c3dc9c11a37ca1339.tar.bz2
drakx-4e827f641935916ad5869d4c3dc9c11a37ca1339.tar.xz
drakx-4e827f641935916ad5869d4c3dc9c11a37ca1339.zip
show attacks of unknown type
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/ifw.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/ifw.pm b/perl-install/network/ifw.pm
index 8550ddcc5..31ad4344c 100644
--- a/perl-install/network/ifw.pm
+++ b/perl-install/network/ifw.pm
@@ -136,12 +136,12 @@ sub attack_to_hash {
$attack->{prefix} eq 'SCAN' ? N("Port scanning")
: $attack->{prefix} eq 'SERV' ? N("Service attack")
: $attack->{prefix} eq 'PASS' ? N("Password cracking")
- : undef;
+ : N(qq("%s" attack), $attack->{prefix});
$attack->{msg} =
$attack->{prefix} eq "SCAN" ? N("A port scanning attack has been attempted by %s.", $attack->{hostname})
: $attack->{prefix} eq "SERV" ? N("The %s service has been attacked by %s.", $attack->{service}, $attack->{hostname})
: $attack->{prefix} eq "PASS" ? N("A password cracking attack has been attempted by %s.", $attack->{hostname})
- : undef;
+ : N(qq(A "%s" attack has been attempted by %s), $attack->{prefix}, $attack->{hostname});
$attack;
}