added some things in gitignore,

added connection tx/rx info to status reports,
added exit, sync, and ping commands,
bot says which channel a restricted person tries to use ops command on,
blacklist system is more intelligent (reason, person adding, can be removed),
added functionality for working with URLs,
automatically retries to join channels that are throttled,
make sure we send passwords to NickServ@services.,
fixed a scheduling loophole that was exploitable,
greatly reduced startup warnings due to slow syncing

1 files changed, 5 insertions, 5 deletions

diff --git a/modules/services.pl b/modules/services.pl
index 4783d2b..528901d 100644
--- a/modules/services.pl
+++ b/modules/services.pl
@@ -17,10 +17,10 @@ sub doServices {
   my $i = 1;
   if ($event->{from} eq 'NickServ!NickServ@services.')
   {
-    ASM::Util->dprint("NickServ: $event->{args}->[0]", 'services');
+    ASM::Util->dprint("NickServ: $event->{args}->[0]", 'snotice');
     if ( $event->{args}->[0] =~ /^This nickname is registered/ )
     {
-      $conn->privmsg( 'NickServ', "identify $::settings->{nick} $::settings->{pass}" );
+      $conn->privmsg( 'NickServ@services.', "identify $::settings->{nick} $::settings->{pass}" );
     }
     elsif ( $event->{args}->[0] =~ /^You are now identified/ )
     {
@@ -41,12 +41,12 @@ sub doServices {
     }
     elsif ($event->{args}->[0] =~ /has been (killed|released)/ )
     {
-      ASM::Util->dprint('Got kill/release successful from NickServ!', 'services');
+#      ASM::Util->dprint('Got kill/release successful from NickServ!', 'snotice');
       $conn->nick( $::settings->{nick} );
     }
     elsif ($event->{args}->[0] =~ /has been regained/ )
     {
-      ASM::Util->dprint('Got regain successful from nickserv!', 'services');
+#      ASM::Util->dprint('Got regain successful from nickserv!', 'snotice');
     }
     elsif ($event->{args}->[0] =~ /Password Incorrect/ )
     {
@@ -58,7 +58,7 @@ sub doServices {
     if ( $event->{args}->[0] =~ /^\[#/ ) {
       return;
     }
-    ASM::Util->dprint('ChanServ: '. Dumper($event->{args}->[0]), 'services');
+    ASM::Util->dprint("ChanServ: $event->{args}->[0]", 'snotice');
     if ( $event->{args}->[0] =~ /^All.*bans matching.*have been cleared on(.*)/)
     {
       $conn->join($1);