add missing Filter.pm mod
[spider.git] / perl / Filter.pm
index c53f9641433f0cf81b6210014019222cb838694c..a83a5217ec86678014c42b0cffd7020305944052 100644 (file)
@@ -373,6 +373,7 @@ sub parse
        my $user;
        
        # check the line for non legal characters
+       return ('ill', $dxchan->msg('e19')) if $dxchan->priv < 8 and $line =~ /{.*}/;
        return ('ill', $dxchan->msg('e19')) if $line !~ /{.*}/ && $line =~ /[^\s\w,_\-\*\/\(\)!]/;
        
        # add some spaces for ease of parsing