Fixed some more stuff.. No more getuuid for normal users!

[irc/SurrealServices/srsv.git] / branches / 0.5.0 / modules / serviceslibs / operserv.pm

diff --git a/branches/0.5.0/modules/serviceslibs/operserv.pm b/branches/0.5.0/modules/serviceslibs/operserv.pm
index b8bf2b9ddbc462a8921c478cc2263f3e9b738755..f82fb5ed27ae52b2ce104bde3f20dadd1b3b061e 100644 (file)
--- a/branches/0.5.0/modules/serviceslibs/operserv.pm
+++ b/branches/0.5.0/modules/serviceslibs/operserv.pm
@@ -38,7 +38,7 @@ use SrSv::NickReg::Flags qw(NRF_NOHIGHLIGHT nr_chk_flag_user);
 use SrSv::MySQL '$dbh';
 
 use SrSv::IPv6;
-
+use Data::Dumper;
 use constant {
        MAX_LIM => 16777215
 };
@@ -47,7 +47,7 @@ use constant {
 
 our $osnick_default = 'OperServ';
 our $osnick = $osnick_default;
-our $osuser = { NICK => $osnick, ircd::getAgentUuid($osnick) };
+our $osuser = { NICK => $osnick, ID => ircd::getAgentUuid($osnick) };
 my %newstypes = (
        u => 'User',
        o => 'Oper'
@@ -77,6 +77,7 @@ our (
 );
 
 sub init() {
+       $osuser = { NICK => $osnick, ID => ircd::getAgentUuid($osnick) };
 =cut
        $add_akill = $dbh->prepare("INSERT INTO akill SET setter=?, mask=?, reason=?, time=?, expire=?");
        $del_akill = $dbh->prepare("DELETE FROM akill WHERE mask=?");
@@ -138,7 +139,7 @@ sub init() {
 }
 
 sub dispatch($$$) {
-       $osuser = { NICK => $osnick, ircd::getAgentUuid($osnick) };
+       $osuser = { NICK => $osnick, ID => ircd::getAgentUuid($osnick) };
        my ($user, $dstUser, $msg) = @_;
        $msg =~ s/^\s+//;
        my @args = split(/\s+/, $msg);