commit b19b7985c6eda97bf830d63afc2d72817f14e097 from: Izzy Blacklock date: Tue Aug 01 04:27:01 2023 UTC Added debug messages to IRCNOW::IO::IRC.pm commit - e298cbe83bcd68c4a811e80d8532a15f6b2c0fb2 commit + b19b7985c6eda97bf830d63afc2d72817f14e097 blob - 4fc2c6360fd8f0cda208003093d69c0290ec2d2f blob + a12a117b7d3b92a0db75f1693b1afbfbc0e8309a --- lib/IRCNOW/IO/IRC.pm +++ lib/IRCNOW/IO/IRC.pm @@ -2,6 +2,8 @@ package IRCNOW::IO::IRC; use strict; use warnings; +use IRCNOW::IO qw(:DEBUG); + use Exporter 'import'; our @EXPORT_OK = qw( @@ -88,10 +90,12 @@ sub cbind { sub isstaff { my( $bot, $nick ) = @_; if( !( $bot->{name} =~ /^$localnet$/i ) ) { + debug(ALL,qq{isstaff--> $bot->{name} not $localnet}); return 0; } foreach( @stafflist ) { if( $nick eq $_ ) { + debug(ALL,qq{isstaff--> $nick not in \@stafflist}); return 1; } }