sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Continue renaming process.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-25 18:19:58 -07:00
1 parent 402dfade65
commit 06aaf41ef0
3 files changed
+9 -9
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

bin/auto
+2 -2
View File
@@ -37,7 +37,7 @@ use API::Log qw(alog dbug);
#use DB::Flatfile; #use DB::Flatfile;
use Parser::Config; use Parser::Config;
use Parser::Lang; use Parser::Lang;
use Parser::IRC; use Proto::IRC;
use Core::IRC; use Core::IRC;
use Core::Cmd; use Core::Cmd;
@@ -499,7 +499,7 @@ while (1) {
dbug $sockid.' >> '.$line; dbug $sockid.' >> '.$line;
# Parse data. # Parse data.
Parser::IRC::ircparse($sockid, $line); Proto::IRC::ircparse($sockid, $line);
} }
} }
} }
lib/API/IRC.pm
+5 -5
View File
@@ -67,7 +67,7 @@ sub cpart
Auto::socksnd($svr, "PART $chan :Leaving"); Auto::socksnd($svr, "PART $chan :Leaving");
} }
if (defined $Parser::IRC::botchans{$svr}{$chan}) { delete $Parser::IRC::botchans{$svr}{$chan}; } if (defined $Proto::IRC::botchans{$svr}{$chan}) { delete $Proto::IRC::botchans{$svr}{$chan}; }
return 1; return 1;
} }
@@ -87,7 +87,7 @@ sub umode
{ {
my ($svr, $modes) = @_; my ($svr, $modes) = @_;
Auto::socksnd($svr, "MODE ".$Parser::IRC::botnick{$svr}{nick}." $modes"); Auto::socksnd($svr, "MODE ".$Proto::IRC::botnick{$svr}{nick}." $modes");
return 1; return 1;
} }
@@ -129,7 +129,7 @@ sub nick
Auto::socksnd($svr, "NICK $newnick"); Auto::socksnd($svr, "NICK $newnick");
$Parser::IRC::botnick{$svr}{newnick} = $newnick; $Proto::IRC::botnick{$svr}{newnick} = $newnick;
return 1; return 1;
} }
@@ -176,8 +176,8 @@ sub quit
Auto::socksnd($svr, "QUIT :Leaving"); Auto::socksnd($svr, "QUIT :Leaving");
} }
delete $Parser::IRC::got_001{$svr} if (defined $Parser::IRC::got_001{$svr}); delete $Proto::IRC::got_001{$svr} if (defined $Proto::IRC::got_001{$svr});
delete $Parser::IRC::botnick{$svr} if (defined $Parser::IRC::botnick{$svr}); delete $Proto::IRC::botnick{$svr} if (defined $Proto::IRC::botnick{$svr});
return 1; return 1;
} }
lib/Proto/IRC.pm
+2 -2
View File
@@ -1,7 +1,7 @@
# lib/Parser/IRC.pm - Subroutines for parsing incoming data from IRC. # lib/Proto/IRC.pm - Subroutines for parsing incoming data from IRC.
# Copyright (C) 2010-2011 Xelhua Development Group, et al. # Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE. # This program is free software; rights to this code are stated in doc/LICENSE.
package Parser::IRC; package Proto::IRC;
use strict; use strict;
use warnings; use warnings;
use API::Std qw(conf_get err awarn trans); use API::Std qw(conf_get err awarn trans);