X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;f=SCX%2FLogPrinter.pm;h=a6124c002df10692c5f08655c74652a75dcfe0c7;hb=1ae1ef53e1bc6383b599782616b656a25094a7e6;hp=445dd4deaa1671a06fbf291c96e4205111d30e9c;hpb=0bc768df52ed78631f048762071a3333e1030af5;p=slotcarman.git

diff --git a/SCX/LogPrinter.pm b/SCX/LogPrinter.pm
index 445dd4d..a6124c0 100644
--- a/SCX/LogPrinter.pm
+++ b/SCX/LogPrinter.pm
@@ -15,7 +15,7 @@ sub new {
 	bless $self, $class;
 
 	$self->{dump_bad_bytes} = 1 if $args->{dump_bad_bytes};
-	$self->{dump_strange}   = 1 if $args->{dump_strage};
+	$self->{dump_strange}   = 1 if $args->{dump_strange};
 	$self->{uniq_only}      = 1 if $args->{uniq_only};
 	$self->{skip_types}     = $args->{skip_types};
 
@@ -67,7 +67,7 @@ sub bad_bytes {
 sub strange_packet {
 	my ($self, $name, @data) = @_;
 
-	return if !$self->{dump_strage};
+	return if !$self->{dump_strange};
 	$self->do_print('strange', $name, stringify_data(@data));
 }