X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FEditable.pm;h=d2f15eeeb144543576316a4c904f929d90b1d3e0;hb=eba7370bb0458ae84b4815f30494a7c389008d0e;hp=0655fcf6a1629050cf9b7fbbb64d75dff7261b1b;hpb=fd0a34c34ad4112ee21e0730f7307498ff437e18;p=spider.git diff --git a/perl/Editable.pm b/perl/Editable.pm index 0655fcf6..d2f15eee 100644 --- a/perl/Editable.pm +++ b/perl/Editable.pm @@ -39,7 +39,7 @@ sub addline my $dxchan = shift; my $line = shift; - if (my @ans = BadWord::check($line)) { + if (my @ans = BadWords::check($line)) { return ($dxchan->msg('e17', @ans)); } push @{$self->{lines}}, $line; @@ -53,7 +53,7 @@ sub modline my $no = shift; my $line = shift; - if (my @ans = BadWord::check($line)) { + if (my @ans = BadWords::check($line)) { return ($dxchan->msg('e17', @ans)); } ${$self->{lines}}[$no] = $line;