- if (parseCommand($msg,$server,$nick,$address,$channel,$disp,DB())){
- #Command parsed and run successfully
- }
+ eval {
+ if ($msg =~ /^(\S+): (.+)$/ && $disp->has_command('anon',$channel)){
+ my $_ = $1;
+ my $text = $2;
+ my $channel = $server->channel_find($channel);
+ my $nick = $channel->nick_find($1);
+ unless ($nick || /(Constructing|Researching)/){
+ print ".anon $_ $text";
+ $msg = ".anon $_ $text";
+ }
+
+ }
+ if (parseCommand($msg,$server,$nick,$address,$channel,$disp,DB())){
+ #Command parsed and run successfully
+ }
+ };
+ print $@ if $@;